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PREFACE 



This manual describes the external features of the Cray Operating System 
(COS) . It is intended as a reference document for all users of COS. 
This manual is divided into three parts to separate the types of material 
presented . 



PART 1 



INTRODUCTION TO JOB PROCESSING 



Part 1 describes the fundamentals of creating and running 
jobs on a Cray Computer System. This part describes the 
system components, storage of information on a Cray Computer, 
and job processing. Part 1 also introduces COS job control 
and describes the use of libraries. 



PART 2 



JOB CONTROL STATEMENTS 



Part 2 describes each COS job control statement and gives the 
format of each with an explanation of its function. 



PART 3 



CONTROL STATEMENT STRUCTURES 



Part 3 describes the control statement block structures 
available with COS. Examples are provided at the end of part 
3, section 4. 
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• CRAY-1 Hardware Reference Manual, publication HR-0004 

• CRAY-1 S Series Mainframe Reference Manual, publication HR-0029 

• CRAY-1 M Series Mainframe Reference Manual, publication HR-0064 

• CRAY X-MP Series Mainframe Reference Manual, publication HR-0032 

• CRAY I/O Subsystem Reference Manual, publication HR-0030 

• Mass Storage Subsystem Hardware Reference Manual, publication 
HR-0630 

• Macros and Opdefs Reference Manual, publication SR-0012 

• FORTRAN (CFT) Reference Manual, publication SR-0009 

• CAL Assembler Version 1 Reference Manual, publication SR-0000 

• Library Reference Manual, publication SR-0014 

• UPDATE Reference Manual, publication SR-0013 
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PART 1 
INTRODUCTION TO JOB PROCESSING 



INTRODUCTION 



The Cray Operating System (COS) is a multiprogramming and multiprocessing 
operating system for Cray Computer Systems. The operating system 
provides for efficient use of system resources by monitoring and 
controlling the flow of work presented to the system in the form of 
jobs. The operating system optimizes resource usage and resolves 
conflicts when more than one job is in need of resources. 

COS is a collection of programs residing in Cray mainframe central memory 
or on system mass storage following startup of the system. (Startup is 
the process of bringing the Cray Computer System and the operating system 
to an operational state.) 

Jobs are presented to the Cray Computer System by one or more computers 
referred to as front-end computers (also referred to as stations in 
Cray Research manuals) . A front-end computer can be any of a variety of 
computer systems. Software executing on the front-end computer system is 
beyond the scope of this publication. 

COS includes linkages providing for the initiation and control of 
interactive jobs and data transfers between the Cray Computer System and 
front-end terminals. These features are available only where supported 
by the front-end system. 

The FORTRAN compiler (CFT) , library routines, the CAL assembler, and the 
UPDATE source maintenance program are described in separate publications. 



HARDWARE REQUIREMENTS 

The Cray Operating System (COS) executes on the basic configuration of 
any CRAY-1 or CRAY X-MP Computer System. Each computer system contains 
the following components: 

• One or two central processing units (CPUs) ; a CRAY-1 contains one 
CPU and a CRAY X-MP contains two CPUs. 

• Central Memory. COS operates with any of four central memory size 
options: one-half million, one million, two million, and four 
million 64-bit words. 
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• A minicomputer based Maintenance Control Unit (MCU) or I/O 
Subsystem (IOS) . The I/O Subsystem, if present, performs all 
required Maintenance Control Unit functions. 

• A mass storage subsystem. The mass storage subsystem may consist 
of DD-19 or DD-29 disk drives, a Solid-state Storage Device (SSD) , 
or Buffer Memory (BMR) . BMR storage can be accessed only through 
an I/O Subsystem; disk drives may be connected either to an I/O 
Subsystem or a CRAY-1 mainframe. SSD storage is connected 
directly to the CRAY-1 or CRAY X-MP mainframe. 

• An optional IBM-compatible tape subsystem. The tape subsystem 
requires that an I/O Subsystem is present. 

The I/O Subsystem consists of from two to four I/O processors and 
one-half million, one million, four million, or eight million words of 
shared Buffer Memory. The optional tape subsystem is composed of at 
least one block multiplexer channel, one tape controller, and two tape 
units. The tape units supported are IBM-compatible 9-track, 200 ips, 
1600/6250 bpi devices. 

Figure 1-1 illustrates a basic system configuration. For more 
information about CRAY-1 or CRAY X-MP hardware characteristics, refer to 
the appropriate mainframe reference manual listed in the preface. 



SYSTEM INITIALIZATION 

COS is loaded into Central Memory and activated through a system startup 
procedure performed at the MCU or I/O Subsystem. At startup, linkage to 
the Permanent Dataset Catalog (DSC) is reestablished on mass storage. 
All permanent mass storage datasets are recorded in the DSC; thus, 
permanent datasets survive startup and the user can always assume that 
they are present. See part 1, section 2 of this manual for more 
information on datasets. 



CENTRAL MEMORY ASSIGNMENT AND CHARACTERISTICS 

Central Memory is shared by COS, jobs running on the Cray mainframe, 
dataset I/O buffers, and system tables associated with those jobs. COS 
allocates resources to each job, when needed, as these resources become 
available. As a job progresses, information is transferred between 
Central Memory and mass storage. These transfers can be initiated by 
either the job or by COS. 

Figure 1-2 illustrates the assignment of memory to COS and to jobs. 
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Figure 1-1. Cray Computer System configuration 



MEMORY-RESIDENT COS 

COS occupies two areas of Central Memory. The memory-resident portion of 
the operating system occupying lower memory consists of exchange 
packages, the System Executive (EXEC) , the System Task Processor (STP) , 
and optionally the Control Statement Processor (CSP) . The 
memory-resident portion of the operating system occupying extreme upper 
memory contains station I/O buffers, space for the system log buffer, and 
Permanent Dataset Catalog (DSC) information and buffers. 
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Figure 1-2. Central Memory assignment 



USER AREA OF MEMORY 



COS assigns every job a user area in Central Memory, 
consists of a Job Table Area (JTA) and a user field. 



The user area 



Job Table Area - JTA 

For each job, the operating system maintains an area in memory that 
contains the parameters and information required for monitoring and 
managing the job. This area is called the Job Table Area (JTA) . Each 
active job has a separate Job Table Area adjacent to the job's user 
field. The Job Table Area is not accessible to the user, although it can 
be dumped for analysis (see part 2, section 8 of this manual) . 



SR-0011 



Part 1 
1-4 



User field 

The user field for a job is a block of memory immediately following the 
job's JTA. The user field is always a multiple of 512 words. The 
beginning or Base Address (BA) and the end or Limit Address (LA) are 
set by the operating system. The maximum user field size is specified by 
a parameter on one of the job control statements (see part 2, section 1) 
or by installation-defined default. A user can request changes in user 
field size during the course of a job. 

Compilers, assemblers, system utility programs, and user programs are 
loaded from mass storage into the user field and are executed in response 
to control statements in the job deck. Each load and execution of a 
program is referred to as a gob step. 

A detailed description of the contents of the user field is given in part 
1, section 3 of this manual. Briefly, however, the first 2OO3 words of 
the user field are reserved for an operating system/job communication 
area known as the Job Communication Block (JCB) . Programs are loaded 
starting at BA+200s and reside in the lower portion of the user field. 
The upper portion of the user field contains tables and dataset I/O 
buffers. The user field addressing limit is equal to LA-1. 

Memory addresses for instructions and operands are relative to BA. The 
Cray mainframe adds the contents of BA to the address specified by a 
memory reference instruction to form an absolute address. A user cannot 
reference memory outside of the user field as defined by the BA and LA 
register contents; LA-1 is the user limit. (Refer to the appropriate 
mainframe hardware reference manual noted in the preface for more 
information.) 



MASS STORAGE CHARACTERISTICS 

Mass storage for CRAY-1 Models A and B consists of 1 to 32 DD-19 or DD-29 
Disk Storage Units (DSUs) . Mass storage for CRAY-1 Models S/500 or 
S/1000 consists of 2 to 32 DD-29 DSUs. Mass storage for the CRAY-1 M 
Series, CRAY X-MP Series, and CRAY-1 S Series Models S/1200 through 
S/4400 consists of 2 to 48 DD-29 DSUs, depending on the number of I/O 
Processors in the I/O Subsystem. These devices are physically 
non-removable . 

Although normally configured as described above, DSUs can be connected 
both to the mainframe and the I/O Subsystem. 

All information maintained on mass storage by the Cray Operating System 
(except specific pre-allocated areas such as the Device Label) is 
organized into quantities of information known as dataset s . In 
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general, the user need not be concerned with the physical transfer of 
data between the disks and memory nor with the exact location and 
physical form in which datasets are maintained on mass storage. COS 
translates the user's logical requests for data input and output into 
disk controller functions automatically. For the orientation of the 
user, physical characteristics of disk storage units are summarized in 
table 1-1. 



Table 1-1. Physical characteristics of disk storage units 



Feature 


DD-19 


DD-29 


Word capacity per drive 


3.723 x 10 7 


7.483 x 10 7 


Word capacity per cylinder 


92,160 


92,160 


Bit capacity per drive 


2.424 x 10 9 


4.789 x 10 9 


Tracks per surface or 


411 


823 


cylinders per drive 






Sectors per track 


18 


18 


Bits per sector 


32,768 


32,768 


Number of head groups 


10 


10 


Latency (revolution time) 


16.7 ms 


16.7 ms 


Access time 


15 - 80 ms 


15 - 80 ms 


Data transfer rate (average 


35.4 x 10 6 


35.4 x 10 6 


bits per second) 






Longest continuous transfer 


92,160 words 


92,160 words 


per request 


(1 cylinder) 


(1 cylinder) 


Total bits that can be 


5.9 x 10 6 


5.9 x 10 6 


streamed to a unit (disk 






cylinder capacity) 







Each disk storage unit contains a device label, datasets, and unused 
space to be allocated to datasets. The device label notes usable and 
unusable (unflawed and flawed) space on the disk unit and designates one 
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of the devices as the Master Device. The Master Device is the disk 
storage unit containing a table known as the Dataset Catalog (DSC) , 
which contains information for maintaining permanent datasets. 

To the user, mass storage permanent datasets are always present and 
available on mass storage. This permanence is achieved through 
techniques permitting the datasets noted in the DSC to be recovered or 
reestablished in the event of system failures. Portions of COS, such as 
the loader, utility programs, the compiler, the assembler, and library 
maintenance and generation routines, reside in permanent datasets 
accessible by user jobs at any time. 

Datasets containing job input decks and output from jobs also reside on 
mass storage. Because these datasets are listed in the Dataset Catalog 
they are also regarded as permanent. This designation is somewhat 
misleading since their permanence is by definition rather than by tenure 
in the system. That is, the input dataset is permanent from the time it 
is staged from the front-end system to the Cray Computer System until the 
job terminates. Output datasets being disposed to a front end are 
permanent from job termination (or whenever the disposition was 
initiated) until the disposition is complete. The permanence of these 
system-defined datasets allows them to be recovered along with other 
permanent datasets after a system failure. 

Any user job can create a mass storage permanent dataset. It can be 
subsequently accessed, modified, or deleted by any other job having 
correct access privileges and producing the correct permission control 
words when attempting to associate it with the job. Permission control 
words are defined at the time the dataset is designated as permanent 
(that is, saved) . 

A permanent dataset ceases to be permanent when a user with the correct 
permission control word deletes it. This deletion notifies COS that the 
space occupied by the dataset is no longer permanent. However, the space 
is still reserved by the dataset until it is released by the user (see 
part 2 sections 3 and 5, respectively, for information on the RELEASE and 
DISPOSE control statements) . 

In addition to the various permanent datasets, mass storage is used for 
temporary datasets. A temporary dataset is created by the job using it 
and remains temporary unless it is designated as permanent, released, or 
disposed to a front end by the job. A temporary dataset neither saved as 
permanent nor disposed of is termed a scratch dataset and ceases to 
exist when the job releases it or terminates. 

COS allocates space to datasets as needed by tracks. Storage assigned to 
a single dataset can be noncontiguous and can even be on multiple disk 
units. Default and maximum sizes for datasets are defined by system 
parameters. The user has limited control over the allocation of storage 
to a dataset through the ASSIGN control statement. 
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MAGNETIC TAPE CHARACTERISTICS 

An I/O Subsystem can include an Auxiliary I/O Processor (XIOP) with the 
capability of addressing up to 16 block multiplexer channels of tape 
units. Each block multiplexer channel can be attached to IBM-compatible 
control units and tape units in a variety of configurations. The block 
multiplexer channels communicate with the control units and tape units to 
allow reading and writing data that can also be read and written on 
IBM-compatible CPUs. The physical characteristics of tape devices are 
summarized in table 1-2. The block sizes in this table are used by the 
COS tape system for transparent-format tape datasets (described in part 
1, section 2) . 



Table 1-2. Physical characteristics of 200 ips, 
9-track tape devices 



Density 
(bits/inch) 


Transfer rate 
(kilobytes/sec) 


Data/2400 ft. 
reel (megabytes) 


% of reel 

containing 

data 


Block size 
(bytes) 


6250 
1600 


1170 
300 


168 
43 


94 
94 


32768 
16384 
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DATASETS 



Nearly all information maintained by the Cray Operating System (COS) is 
organized into quantities of information known as datasets. The 
following are some of the more important factors to remember about 
datasets. 

• The dataset medium is the type of physical device on which the 
dataset resides. 

• The dataset structure is the logical organization of the dataset. 

• The dataset longevity is the retention period for the dataset. 

• A dataset must be local to be usable. 

• The dataset disposition code tells the operating system what 
action to take when the dataset is no longer local. 

• Each dataset is known by its dataset name. 

• Datasets are read and written using operating system requests 
(user I/O interfaces) . 



DATASET MEDIUM 

Datasets can be classified by medium, as follows: 

• Mass storage datasets 

• Memory-resident datasets 

• Interactive datasets 

• Magnetic tape datasets 

MASS STORAGE DATASETS 

All datasets, unless otherwise specified, reside on Cray mass storage, 
that is, on mass storage attached directly to the mainframe or to the I/O 
Subsystem. 
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MEMORY-RESIDENT DATASETS 

Some datasets can be specified by the user as memory-resident datasets. 
A memory -resident dataset is wholly contained within one buffer (see BS 
parameter on the ASSIGN control statement in part 2, section 3 of this 
manual) and remains in memory at all times. Such a dataset ordinarily 
occupies no mass storage. A memory-resident dataset is normally a 
temporary dataset; however, a mass storage permanent dataset can be 
declared memory resident. 

A dataset can be declared memory resident to reduce the number of I/O 
requests and disk blocks transferred. Memory residence is particularly 
useful for intermediate datasets not intended to be saved or disposed to 
another mainframe. All I/O performed on a memory-resident dataset takes 
place in the dataset buffers in memory and the contents of the buffers 
are not ordinarily written to mass storage. Such a dataset cannot be 
made permanent, nor may it be disposed to another mainframe, unless 
copied to mass storage. 

Normally, a memory-resident dataset is empty until written on. If an 
existing dataset is declared memory resident, it is loaded when the first 
read occurs. A user attempting to write to a memory-resident dataset 
must have write permission. However, as long as the buffer does not 
appear full, no actual write to mass storage ever occurs. Therefore, 
changes made to an existing dataset declared memory resident are not 
reflected on the mass storage copy of the dataset. 

A memory-resident dataset must be defined through an ASSIGN control 
statement containing the MR parameter or through an F$DNT call to the 
system. If the F$DNT call is used, the Dataset Definition List (DDL) 
supplied should specify DDMR=1. (See the description of the ASSIGN 
control statement in part 2, section 3 of this manual.) In addition, the 
buffer size parameter should specify a buffer large enough to contain the 
entire dataset plus one block. 

If at any time the system I/O routines are called to write to the dataset 
and the buffer appears to be full, the dataset ceases to be treated as 
memory resident, the buffer is flushed to mass storage, and all 
memory-resident indicators for the dataset are cleared. 

Magnetic tape, execute-only, and interactive datasets cannot be declared 
memory resident. 



INTERACTIVE DATASETS 

A dataset can be specified as interactive by an interactive job, provided 
that interactive datasets are supported by the front end. Batch users 
cannot create interactive datasets. An interactive dataset differs from 
a local dataset in that a disk image of the dataset is not maintained. 
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Instead, records are transmitted to and from a terminal attached to a 
front-end station. Record positioning (for example, REWIND or BACKSPACE) 
is not possible. 

Interactive datasets can be created by interactive jobs through the use 
of the ASSIGN control statement or F$DNT system call. 



MAGNETIC TAPE DATASETS 

A magnetic tape dataset is available to any job declaring tape resource 
requirements on the JOB statement and specifying the appropriate 
information on its ACCESS request. 

A magnetic tape (referred to in this manual as a magnetic tape dataset) 
can be unlabeled (NL) , ANSI standard labeled (AL) , or IBM standard 
labeled (SL) , and can be recorded or read at either 1600 or 6250 bits per 
inch (bpi) . To gain access to an existing tape dataset for reading 
and/or rewriting, the correct file identifier (permanent dataset name), 
the desired device type, and, optionally, a volume identifier list must 
be specified. The volume identifier list can consist of 1 to 255 volume 
identifiers. If the permanent dataset name (PDN) is omitted from the 
ACCESS request, the local dataset name is used as the file identifier. 

To gain access to a tape dataset for creating, the file identifier, 
desired device type, and the NEW parameter option must be specified on 
the ACCESS request. If no file identifier is present, the local dataset 
name is used. If the volume identifier list is missing from the access 
request, it is called a non-specific volume allocation. A specific 
volume allocation occurs when the volume identifier list is present at 
the time of the access request. New tape datasets must be written to 
before a read is allowed. 

Other options describing the tape dataset are available from the access 
request. See the ACCESS control statement description (part 2, section 4 
of this manual) for more details. Using other parameter options allows 
more efficient tape dataset descriptions. 

COS automatically switches volumes during dataset processing and returns 
to the first volume of a multivolume dataset in response to a REWIND 
command. If a permanent write error occurs when trying to write a tape 
block for the user, COS automatically attempts to close the current 
volume and continues to the next volume. 

The COS tape system uses Buffer Memory as a tape block buffering area so 
that the job's I/O buffer need not be as large as the tape block (as with 
other operating systems) . This technique can result in significant 
memory savings whenever large tape blocks are being processed and in 
increased transfer rates whenever smaller blocks are being processed. 
The advantage in having a large COS buffer is a reduction in the overhead 
in the tape subsystem. 
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DATASET STRUCTURE 

COS supports several dataset structures: 

• Blocked format 

• Interactive format 

• Unblocked format 

• Tape formats (interchange or transparent) 

BLOCKED FORMAT 

Blocked format is used by default for external types of datasets, such as 
user input and output datasets. Record positioning requires a blocked 
format. The blocked format adds control words to the data to allow for 
processing of variable-length records and to allow for delimiting of 
levels of data within a dataset. A blocked dataset can be composed of 
one or more files, which are, in turn, composed of one or more records. 
Figure 2-1 illustrates the data hierarchy within a dataset. 



Dataset 



Record 



1 



Record 2 




File, 



m 



Record, 



Figure 2-1. Data hierarchy within a dataset 



The data in a blocked dataset can be coded and/or binary. Blanks are 
normally compressed in blocked coded datasets. Each block consists of 
512 words. Blocked datasets use two types of control words: block and 
record. 
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Blank compression 

Blank fields can be compressed for blocked coded files. Blank field 
compression is indicated by a blank field initiator code followed by a 
count. The default blank field initiator code is defined by the 
installation parameter I@BFI which is either an ASCII code or 777 8 
indicating that blank compression will not be done. Blank compression 
can be inhibited using an ASSIGN statement parameter or an F$DNT system 
call. A blank field of 3 through 96 characters is compressed to a 
2-character field. The count is biased by 36 8 ; the actual character 
count is limited to 41g <_ ehavaatev count ^_ 176 8 (the ASCII graphics) . 



Block control word 

The block control word (BCW) is the first word of every 512-word block. 
The format of a block control word is depicted in figure 2-2. 
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16 



24 
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M I //////// L I ///////////////// I 
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BDF 



Figure 2-2. Format of a block control word 



Field 



Bits 



Description 



M 



0-3 



Type of control word (for block control word, 
M=0) 



BDF 



11 



Bad data flag; indicates the following data, up 
to the next control word, is bad. This flag is 
set by the I/O Subsystem for magnetic tape 
datasets in interchange format. 



BN 



31-54 Block number. Designates the number of the 
current data block. The first block in a 
dataset is block 0. 



FWI 



55-63 Forward index. Designates the number of words 
(starting with 0) to the next record control 
word or block control word. 



Record control word 

A record control word (RCW) occurs at the end of each record, file, or 
dataset. The format of a record control word is illustrated in figure 
2-3. 
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TRAN^ BDF 
8 / / 16 24 32 40 48 56 63 



i*l 



mi ubc rr 1/////1 PFI | PRI I FWI 



Figure 2-3. Format of a record control word 

Field Bits Description 

M 0-3 Type of control word: 

IO3 End-of-record (EOR) 
16 8 End-of-file (EOF) 
17 8 End -of -data (EOD) 

UBC 4-9 Unused bit count. For end-of-record, UBC 

designates the number of unused low-order bits 
in the last data word of the record terminated 
by the end-of-record. For end-of-file and 
end-of-data RCWs, this field is 0. The data 
area protected by UBC must be zero-filled. 

TRAN 10 Transparent record field; used for an 

interactive output dataset only. If set, 
substitution of end-of-record RCWs is suppressed. 

BDF 11 Bad data flag; indicates the following data, up 

to the next control word, is bad. This flag is 
set by the I/O Subsystem for magnetic tape 
datasets in interchange format. If flag is set, 
an irrecoverable error was encountered in 
following data. 

PFI 20-39 Previous file index. This field contains an 

index modulo 2 20 (20,000,000 8 ) to the beginning 
of the file. The index is relative to the 
current block such that if the beginning of the 
file is in the same block as this RCW, the PFI 
is 0. 

PRI 40-54 Previous record (RCW) index. This field 

contains an index modulo 2 15 (100,0003) to tne 
block where the current record starts. The 
index is relative to the current block such that 
if the first word of data in this record is in 
the same block as this RCW, PRI is 0. 

FWI 55-63 Forward word index. This field points to the 

next control word (RCW or BCW) and consists of a 
count of the number of data words up to the 
control word (that is, if the next word is an 
RCW or BCW, FWI is 0) . 



Part 1 
SR-0011 2-6 



Disregarding block control words occurring at 512-word intervals in a 
dataset, RCWs have the following logical relationship in a dataset. 

An end-of-record RCW immediately follows the data for the record it 
terminates. If the record is null, that is, if it contains no data, an 
end-of-record RCW can immediately follow an end-of-record or end-of-f ile 
RCW or can be the first word of the dataset. 

An end-of-file RCW immediately follows the end-of-record RCW for the 
final record in a file. If the file is null, that is, if it contains no 
records, the end-of-file RCW can immediately follow an end-of-file RCW or 
can be the first word of the dataset. 

An end-of-data RCW immediately follows the end-of-file RCW for the final 
file in the dataset. If the dataset is null, the end-of-data RCW can be 
the first word on the dataset. 

The typical dataset has many end-of-record RCWs per block. An example of 
dataset control words is illustrated in figure 2-4. In this example, a 
dataset is contained within four physical sectors, each beginning with a 
BCW (thus the four BCWs in this example are numbered 0, 1, 2, 3). The 
dataset contains four files shown as Fl, F2, F3, and F4. Fl contains the 
four records shown as Rl through R4; F2 contains records R5 through R7; 
F3 contains no records at all; F4 contains record R8. 



INTERACTIVE FORMAT 

Interactive format closely resembles blocked format; however, each buffer 
begins with a block BCW. Each record transmitted to or from COS by an 
F$RDC or an F$WDC call must contain a single record consisting of a BCW, 
data, and an end-of-record RCW. 

Two formats for interactive output can be assigned when the dataset is 
created: character blocked and transparent. Character blocked mode is 
the default. In character blocked mode, an end-of-record RCW is 
interpreted as a line feed or a carriage return. In transparent mode, 
the end-of-record RCW is ignored and the user is responsible for 
supplying carriage control characters. 



UNBLOCKED FORMAT 

Dataset I/O can also be performed using unblocked datasets. The data 
stream for -unblocked datasets does not contain Cray Operating System 
record control words (RCWs) or block control words (BCWs) . 
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Dataset 



Figure 2-4. Example of dataset control words 
(octal values shown) 
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The system does not allocate buffers in the job's I/O buffer area for 
unblocked datasets; the user must specify an area for data transfer. 
When a read or write is performed on an unblocked dataset, the data goes 
directly to or from the user data area without passing through an I/O 
buffer. The word count of data to be transferred must be a multiple of 
512. 

Unblocked I/O cannot be performed on an interchange format tape dataset 
(see below) . 



TAPE FORMATS 

Tape datasets are written and read on tape volumes. A tape volume is a 
reel of tape. A tape volume is also known as a dataset section (for 
example, in FSEC= on the ACCESS statement) . 

Data is read or written in tape blocks. A tape block is a unit of data 
recorded on magnetic tape between two consecutive interblock gaps. The 
size of tape blocks can vary from one byte to a maximum of approximately 
one million bytes. 

Tape datasets can be read or written using two different formats: 
interchange or transparent. Tape datasets can also be labeled or 
unlabeled. 



Interchange format 

Interchange format facilitates reading and writing tapes that are also to 
be read or written on other vendors' systems. In interchange format, 
each tape block of data corresponds to a single logical record in COS 
blocked format (that is, the data between record control words) . 

In interchange format, tape block lengths can vary up to an 
installation-defined maximum which cannot exceed 1,048,576 bytes (131,072 
64-bit words) . It is recommended that the maximum block size not exceed 
100 to 200 kilobytes. Blocks exceeding these sizes may require special 
operational procedures (such as the use of specially prepared tape 
volumes having an extended length of tape following the end-of-tape (EOT) 
reflective marker) and yield little increase in transfer rates or storage 
capacity. 

When a tape dataset is read in interchange mode, physical tape blocks are 
represented in the user's I/O buffer with block control words (BCWs) and 
record control words (RCWs) added by COS. The data in each tape block is 
terminated by an RCW. The unused bit count field in the RCW indicates 
the amount of data in the last word of the tape block that is not valid 
data. A BCW is inserted before every 511 words of data, including the 
RCWs. The formats of RCWs and BCWs are described previously in this 
section and shown in figures 2-2 and 2-3. 
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Figure 2-5 depicts a tape dataset in interchange format. Tape blocks 
within tape label groups are not included in this format. The end of the 
dataset is represented by an end-of-f ile (EOF) RCW followed by an 
end-of-data (EOD) RCW. 

When a tape dataset is written in interchange format, the data must be in 
the I/O buffer in the user field in COS blocked format. The data in each 
logical record is written as a single tape block. BCWs and RCWs are not 
recorded on tape. BCWs within a record are discarded and the unused bits 
and terminating RCW are also discarded. The unused bit count must be a 
multiple of 8. Tape datasets written in interchange mode must consist of 
a single file (single EOF RCW). Multiple-file tape datasets are not 
supported in interchange mode. 



Transparent format 

In transparent format (disk image) , each tape block is a fixed multiple 
of 4096 bytes (512 words), generally based on the dataset density (that 
is, 16,384 bytes at 1600 bpi and 32,768 bytes at 6250 bpi) . The data in 
the tape block is transferred unaltered between the tape and the I/O 
buffer in the user field; no control words are added on reading or 
discarded on writing. In transparent mode, the data can be in COS 
blocked format or COS unblocked format. Transparent format tapes are not 
generally read or written by other vendors' equipment. 



DATASET LONGEVITY 

Permanent datasets are retained by the operating system until instructed 
otherwise. All other datasets are considered temporary. 



TEMPORARY DATASETS 

A temporary dataset is available only to the job that created it. 
Temporary datasets can be created in two ways: either explicitly by use 
of the ASSIGN control statement, or implicitly upon first reference to a 
dataset by name or unit number on an I/O request or an OPEN macro call. 

A temporary mass storage dataset is empty until written on. Rewind or 
backspace of the dataset is necessary before it can be read. A temporary 
dataset can be made permanent by use of the SAVE control statement. If 
the dataset is not made permanent, it is released at job termination or 
by the specific RELEASE function request and its mass storage made 
available to the system. 
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TAPE DATA AS IT APPEARS IN I/O 
BUFFER (IN 512-WORD UNITS) 



DATA IN TAPE BLOCKS 
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Figure 2-5. Interchange-format tape dataset 
(octal values shown) 
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PERMANENT DATASETS 

Only mass storage or magnetic tape datasets can be permanent. 

Magnetic tape permanent datasets 

Tape datasets are discussed under Dataset Media earlier in this section. 



Mass storage permanent datasets 

A mass storage -permanent dataset is available to the system and to 
other jobs and is maintained across system startups. Permanent datasets 
are of two types: those created by SAVE requests made by the user or 
front-end system (user permanent datasets), and input, output, or COS 
internal datasets (system permanent datasets) . 

User permanent datasets are maintained for as long as the user or 
installation desires. They can be protected from unauthorized access by 
use of permission control words and ownership values. 

When a user permanent dataset is accessed via an ACCESS control statement 
(see part 2, section 4 of this manual) , it is treated as a local dataset 
by the job requesting access. However, it still exists as a permanent 
dataset on the system and can be used by other jobs unless unique access 
to that dataset was granted. If any information in an existing permanent 
dataset is overwritten or if the size of a permanent dataset is changed, 
an ADJUST should be performed on that dataset (see part 2, section 4 of 
this manual) . An ADJUST is performed automatically when a permanent 
dataset is released. 

System permanent datasets relate to particular jobs or reflect the 
current operational state of COS. A job's input dataset is made 
permanent when the job is received by the Cray Computer System and is 
deleted when the job terminates. Output datasets local to the job can 
be disposed while the job is running or can be automatically made 
permanent when the job terminates and then deleted from the Cray Computer 
System after being sent to the front-end system for processing. An 
example of a system permanent dataset is the system log. 

An exeeute-only dataset is a user permanent mass storage dataset for 
which all forms of examination and modification by users are prohibited. 
An execute-only dataset is loaded by the Control Statement Processor 
(CSP) for execution. It differs in usage from other user permanent 
datasets in several ways: 

• The accessor of the dataset cannot open the dataset for reading or 
writing. 
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• While an execute-only dataset is loaded in memory, no DUMPJOB 
requests are honored. 

• The dataset cannot be staged via a DISPOSE request. 

• The dataset must be loaded by a dataset name call rather than by 
the LDR control statement. 

• The dataset cannot be dumped via PDSDUMP for archiving purposes. 

Because execute-only is a dataset state father than a permission mode, it 
is advisable to set, at minimum, a maintenance permission control word to 
disallow modification or deletion of the dataset. 



LOCAL DATASETS 

A dataset to which a job has access is a local dataset. A local dataset 
can be temporary or permanent. Permanent datasets are made local with 
the ACCESS control statement or the ACCESS library subroutine (described 
in the Library Reference Manual, CRI publication SR-0014) . If the 
dataset referenced is a tape dataset, the device resource must also be 
specified on the JOB control statement (see part 2, section 2 of this 
manual) . 



DATASET DISPOSITION CODES 

Each dataset is assigned a disposition code telling the operating system 
the disposition to be made of the dataset when the job is terminated or 
the dataset is released. The disposition code is one of the parameters 
of the DISPOSE and ASSIGN control statements (see part 2, section 3 of 
this manual) . 

Each disposition code is a 2-character alphabetic code describing the 
destination medium of the dataset. The default disposition code for a 
dataset is SC (scratch) when a dataset is opened, unless the dataset 
named is one of a group of special names such as $PLOT, 3PUNCH, and 
$OUT. By default, COS assigns the disposition code PR (print) to $OUT 
when the dataset is created. No DISPOSE statement is required for $OUT; 
it is automatically routed back to the originating mainframe with a PR 
(print) disposition. 
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USER DATASET NAMING CONVENTIONS 

The user assigns a symbolic name to each user dataset. This name, the 
local dataset name, is one through seven characters, the first of which 
can be A through Z, $, @, or %; remaining characters can also be 
numeric. However, a permanent dataset name does not have this 
restriction; all characters in a permanent dataset name can be 
alphanumeric. Certain language processors place further restrictions on 
dataset names. 

Most datasets defined by COS are assigned names of the form $dn. Since 
datasets whose names begin with a $ may receive special handling by the 
system, the user should refrain from using this format when naming 
datasets. 



USER I/O INTERFACES 

When using logical I/O, the user is never directly concerned with the 
actual transfer of data between the devices and the system buffers. 
Figure 2-6 illustrates the relationship of different levels of user 
logical I/O interfaces and routines. In this figure, the request levels 
and routine calls are summarized without going into detail on the 
movement of data between the system buffers and user program areas. For 
details on logical I/O, see the Macros and Opdefs Reference Manual, CRI 
publication SR-0012. 

The highest level of user interface is FORTRAN I/O statements; the lowest 
level is in the form of specially formatted requests called Exchange 
Processor requests. 

FORTRAN statements fall into two categories: formatted/unformatted and 
buffered. The formatted/unformatted statements result in calls to 
library routines $RFI through $WUF. If the dataset is blocked, these 
routines call the logical record I/O routines. The logical record I/O 
routines perform blocking and deblocking. The logical record I/O 
routines communicate with COS through the Exchange Processor requests, 
F$RDC and F$WDC. 

If the dataset is unblocked, $RUA or $WUA calls the unblocked dataset 
routine $RLB or $WLB. These routines do no blocking or unblocking of 
data. The unblocked J/0 routines communicate with the system through the 
F$RDC and F$WDC Exchange Processor calls. 

Buffered I/O takes a different path from formatted/unformatted I/O. 
These routines interface (through an F$BIO Exchange Processor request) to 
routines in COS that normally perform logical I/O for system tasks. 
These routines, called Task I/O or TIO, closely resemble the logical 
record I/O routines. TIO and the logical record I/O routines make 
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Figure 2-6. Relationship of levels of user I/O 
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similar requests of circular I/O routines in COS although the mechanism 
for making these requests is different. 

Circular I/O routines (CIO) are the focal point for all logical I/O 
generated by COS. CIO communicates its needs for physical I/O to the 
Disk Queue Manager or Tape Queue Manager. 

A FORTRAN buffered I/O request issued for an unblocked dataset results in 
the buffered I/O routines calling the unblocked dataset routines $RLB and 
$WLB, which then process these requests. These requests are processed 
the same as formatted/unformatted requests except that buffered I/O 
requests return control to the user after initiating I/O rather than 
waiting for completion of the I/O request. For a CAL buffered I/O 
request, $CBIO is called to route the request to either the blocked or 
unblocked I/O processing routines. 

Cray Assembly Language (CAL) I/O macros are described in the Macros and 
Opdefs Reference Manual, CRI publication SR-0012. Logical record I/O 
routines and FORTRAN I/O routines are described in the Library Reference 
Manual, CRI publication SR-0014. See the FORTRAN (CFT) Reference Manual, 
CRI publication SR-0009, for a description of FORTRAN statements. 
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COS JOB PROCESSING 



A job is a unit of work submitted to the Cray Computer System. It 
consists of one or more files of card images contained in a job deok 
dataset. Each job passes through several stages from job entry through 
job termination. 



JOB DECK STRUCTURE 

A job originates as a card deck (or its equivalent) at a front-end 
computer system. Card images in the job deck dataset are organized into 
one or more files. Figure 3-1 illustrates a typical job deck consisting 
of a control statement file, a source file, and a data file. (The 
physical card forms for end-of-file and end-of-data are defined by 
the front-end system.) 




JCL CONTROL STATEMENT 
FILE 



Figure 3-1. Basic job deck 
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The first (or only) file of the job deck must contain the job control 
language (JCL) control statements that specify the job processing 
requirements (JCL is described in part 1, section 4 of this manual) . 
Each job begins with a JOB statement, identifying the job to the system. 
If accounting is mandatory in the user's system, the ACCOUNT statement 
must immediately follow the JOB statement. All other control statements 
follow the JOB statement. Control statements can also be grouped into 
control statement blocks as decribed in part 3, section 1 of this 
manual. The end of the control statement file is designated by an 
end-of-f ile record (or an end-of-data record if the job consists of a 
control statement file only) . 

Files following the control statement file can contain source code or 
data. These files are handled according to instructions given in the 
control statement file. 

The final card in a job deck must be an end-of-data. 



GENERAL DESCRIPTION OF JOB FLOW 

A job passes through the following stages from the time it is read by the 
front-end computer system until it completes: 

• Entry 

• Initiation 

• Advancement 

• Termination 



JOB ENTRY 

A job can enter the system in the form of a dataset submitted from a 
front-end computer system or a local or remote job entry station. The 
job is transferred to Cray Computer System mass storage, where it resides 
until it is scheduled to begin processing. The job input dataset is made 
permanent until it is deleted at the completion of the job. 



JOB INITIATION 

The operating system examines the parameters on the JOB control statement 
to determine the resources needed. When system resources required for 
initiation are available, the job is initiated (scheduled to begin 
processing) . 
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Initiation of a job includes preparing a Job Table Area (JTA) and user 
field, positioning the input dataset for the first job step, and placing 
the job in a waiting queue for the CPU. 

When COS schedules the job for processing, it creates four datasets: 
$CS, $IN, $OUT, and $LOG. 

$CS is a copy of the job's control statement file from $IN and is used 
only by the system; the user cannot access $CS by name. This dataset is 
used to read job control statements. The disposition code for $CS is SC 
(scratch) . 

$IN is the job input dataset. The job itself can access the input 
dataset, with read only permission, by its local name, $IN, or as FORTRAN 
unit 5. 

$OUT is the job output dataset. The job can access this dataset by name 
or as FORTRAN unit 6. The disposition code for $OUT is PR (print) . 

The job's logfile ($LOG) contains a history of the job. This dataset is 
known only to the operating system and is not accessible by the user. 
User messages can be added to the job's logfile with the MESSAGE system 
action request macro (see the Macros and Opdefs Reference Manual, CRI 
publication SR-0012) or the REMARK, REMARK2, or REMARKF subroutines (see 
the Library Reference Manual, CRI publication SR-0014) . 



JOB ADVANCEMENT 

Job advancement is the processing of a job according to the instructions 
in a control statement file. Advancement occurs as a normal advance or 
as an abort advance. 

A normal advance causes COS to interpret the next control statement in 
the job's control statement file. 

An abort advance occurs if the operating system detects an error or if 
the user requests that the job abort. Abort advances are described fully 
under Exit Processing later in this section. 



JOB TERMINATION 

Output from a job is placed on system mass storage. At completion of a 
job, the operating system appends SLOG to $OUT and makes SOUT permanent. 
$IN, $CS, and $LOG are released. $OUT is renamed jn (from the JN 
parameter value of the JOB control statement described in part 2, 
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section 2 of this manual) and is directed to the output queue for staging 
to the specified front-end computer system. When the front end has 
received the entire contents of $OUT, the output dataset is deleted from 
COS mass storage. 

The front-end computer processes $OUT as specified by the dataset 
disposition code. If, for any reason, $OUT does not exist, $LOG is the 
only output returned at job termination. 



JOB MEMORY MANAGEMENT 

Central Memory is a resource that is allocated to jobs by the operating 
system. A job's memory is composed of several distinct areas. Some of 
these areas are managed exclusively by the system for the user; others 
are managed by both the system and the user. 

Figure 3-2 illustrates a job in memory. The total job size equals the 
length of the job's Job Table Area (JTA) plus user field length. The 
lined area between JCHLM and JCLFT is unused space within the job. This 
area contains enough memory to guarantee that the job size is always a 
multiple of decimal 512 words. 



INITIAL MEMORY ALLOCATION 

When the job initiates it is given sufficient memory for the Control 
Statement Processor (CSP) to execute. Once the JOB statement is 
processed, the job is allowed a field length no larger than the amount 
specified by the MFL parameter on the JOB control statement (see part 2, 
section 2 of this manual) . 



MODES OF FIELD LENGTH REDUCTION 

There are two modes of field length reduction: automatic and user 
managed . 

• Automatic field length reduction mode 

When the job is in automatic field length reduction mode, the 
system automatically increases and decreases the job's field 
length as the areas within the job increase and decrease. A job 
initiates in automatic field length reduction mode. 

• User-managed field length reduction mode 
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When the job is in user-managed field length reduction mode, the 
system continues to increase the job's field length as before, but 
never automatically decreases it. The job's field length can be 
decreased only by the user until the job is returned to automatic 
field length reduction mode. 



//////////////////////////////////////////////////////// 
|//////////////////////////////////////////////////////// 
//////////////////////////////////////////////////////// 
|/////////////////// Job Table Area /////////////////// 
//////////////////////////////////////////////////////// 
//////////////////////////////////////////////////////// 
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Figure 3-2. User area of memory for a job 
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The field length can be reduced at the beginning of each job step and 
during each job step if the job is in automatic field length reduction 
mode and any area of the job decreases. Since increases in field length 
can result in the job's requiring more memory than can be immediately 
supplied, which causes the job to be delayed until sufficient memory can 
be given to it, the user may want to manage the job's field length when 
it is known that the job will undergo frequent short-lived fluctuations 
in size. 



USER MANAGEMENT OF MEMORY 

A user can dynamically manage the user code/data area of the job by 
requesting an increase or decrease of memory at the end of the user 
code/data area. 

A user can manage the field length of the job by requesting a specific 
field length. 

When the user manages the field length of the job, the job is placed in 
user-managed field length reduction mode for the duration of the job step 
(next job step when using the MEMORY control statement described in part 
2, section 4 of this manual) . 

A user can place the job in user-managed field length reduction mode 
across job steps by explicitly requesting that mode. The job remains in 
user-managed field length reduction mode until the user explicitly 
requests automatic field length reduction mode. 



Management by control statement from the run stream 

A user can use the MEMORY control statement to manage the job's field 
length. When the user manages the job's field length, the job will be 
placed in user-managed field length reduction mode for the duration of 
the next job step. The MEMORY control statement may also place the job 
in user-managed field length reduction mode across job steps or return 
the job to automatic mode. 



Management from within a program 

From within a program, use of the MEMORY macro or MEMORY routine, 
respectively, requests user management of the job's user code/data area 
and field length. When the user manages the job's field length, the job 
is placed in user-managed field length reduction mode for the duration of 
the job step. The MEMORY macro or MEMORY routine may also place the job 
in user-managed field length reduction mode across job steps or return 
the job to automatic mode. 
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Management associated with a program 

Use of the BC, PAD, and NORED parameters on the LDR control statement 
(see part 2, section 9 of this manual) causes certain memory management 
to be associated with the binary being loaded. This association is 
stored with the binary if the binary is saved on a dataset. The 
management associated can be user code/data area management or field 
length management and occurs when the binary is loaded for execution. If 
the field length is being managed, the job is placed in user-managed 
field length reduction mode for the duration of program execution. 



SYSTEM MANAGEMENT OF MEMORY 

The system changes appropriate areas of the job's memory when a job 
initiates certain system actions (that is, advances to the next job step, 
does I/O, etc.). The Job Table Area, Logical File Tables, and Dataset 
Parameter Area pictured in figure 3-2 can increase, but will never 
decrease. The user code/data and buffer areas may both increase and 
decrease in size. If the job is in automatic field length reduction 
mode, the system automatically increases and decreases the job's field 
length when any area in the job increases or decreases. If the job is in 
user-managed field length reduction mode, the system continues to 
increase the field length when it needs to, but never automatically 
decreases the field length. 



JOB RERUN 

Under certain circumstances, restarting of a job from its beginning may 
become necessary or desirable. This is referred to as rerunning a job. 
Conditions causing the system to attempt to rerun a job are: 

• Operator command, 

• Uncorrectable memory error, 

• Uncorrectable error reading the mass storage image of a job, and 

• System restart. 

A user job may perform certain functions that normally make its rerunning 
impossible. The functions render a job nonrerunnable because they 
produce results that might cause the job to run differently if it were 
rerun. These functions include: 
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• Writing to a permanent dataset 

• Saving, deleting, adjusting, or modifying a permanent dataset 

• Acquiring a dataset from a front-end system 

Ordinarily, when a job becomes nonrerunnable, it remains so. However, 
the user may declare that the job is rerunnable. The user should do this 
only when changes in job results due to execution of nonrerunnable 
functions are acceptable. COS never makes a job rerunnable automatically. 

The user can also override system monitoring of job rerunnability , 
regardless of what functions the job performs. This ordinarily is done 
only if the job is structured to run correctly regardless of whether 
nonrerunnable functions are performed. 



EXIT PROCESSING 

When an error condition is detected by COS or when the user requests a 
job step abort, COS checks to see if the condition is to be reprieved 
(Reprieve Processing is described in the next subsection) . If no 
reprieve occurs, exit processing occurs. Generally, when a job step 
abort occurs, the current job step is immediately abandoned and control 
statements are skipped until the next eligible EXIT statement is 
encountered (EXIT is described in part 2, section 2 of this section). 
Normal job advancement occurs with the EXIT statement that is found. If 
no eligible EXIT statement is found, the job is terminated. 

EXIT statements that are within control statement blocks (iterative, 
conditional, or in-line procedure) that have not yet been invoked are 
ignored during the search for the next eligible EXIT statement. 

If the block currently being processed is a conditional block (see part 
3, section 1) , only the group of control statements preceding the next 
conditional statement in the block is searched for an eligible EXIT 
statement; if none is found, the search continues with the first 
statement following the conditional block. For example, in the following 
sample control statement sequence, an abort advance occurs at the control 
statement THIS IS A JOB STEP ABORT CONDITION because it does not begin 
with a valid verb. Control statement interpretation resumes with the 
control statement: *. RESUME HERE. The EXIT statements that are 
included in the conditional block are ignored because they reside in 
blocks that are not executed. 
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SET,J1=0. 
IF(Jl.EQ.O) 



THIS IS A JOB STEP ABORT CONDITION. 
ELSEIF (Jl.EQ.l) 



EXIT. 
ELSE. 

EXIT. 
ENDIF . 



EXIT. 

*. RESUME HERE 



Exit processing is not performed for interactive jobs except inside an 
invoked procedure. After a job step abort occurs, the user is simply 
prompted for the next control statement. 



REPRIEVE PROCESSING 

Normally, when a job step abort error occurs, exit processing begins (see 
the previous section for a full description of exit processing) . 
Reprieve processing, however, allows a user program to attempt recovery 
from many of the job step abort errors or to perform clean-up functions 
before continuing with the abort. 

Reprieve processing can also be used during the normal termination of a 
job step. In this case, control transfers to the user's reprieve code 
instead of to the next normal job step. 

Two types of error conditions are related to a job step: nonfatal and 
fatal. 

• Nonfatal error conditions are those which can be reprieved any 
number of times per job step by the user. 

• Fatal error conditions can be reprieved only once for each type 
per job step. 
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See Appendix D for a listing of all fatal and nonfatal error conditions. 

When requesting reprieve processing, the user selects the error 
conditions to be reprieved by setting a mask in the SETRPV subroutine or 
macro call. If a selected error condition occurs during job processing, 
the user's current job step maintains control. The user's exchange 
package, vector mask register, error code, and error class are saved and 
control passes to the user's reprieve code. 



INTERACTIVE JOB PROCESSING 

An interactive job dataset has interleaved control statements, program 
or utility input, and program or utility output. In an interactive job, 
the control statement file ($CS) , standard input dataset ($IN) , standard 
output dataset ($OUT) , and logf ile ($LOG) are all defined by the system 
to be interactive datasets. See part 1, section 2 for more information 
on interactive datasets. 

Each job step of an interactive job is initiated with a control 
statement. Control statements can be either part of a procedure 
invocation or entered directly from the interactive terminal. After 
each control statement is received by COS, input to the job step can be 
entered from the terminal and output and logfile information is returned 
to the terminal. When the current job step is complete, normal job 
advancement occurs and COS prompts for the next control statement (or 
reads it from the invoked procedure file). Exit processing (see part 1, 
section 3) is never performed on an interactive job except within a 
procedure invocation. 

Whenever a program or utility executing as part of an interactive job 
requests to read from the standard input dataset, the interactive user 
is prompted to enter data one record at a time. Likewise any data 
written to SOUT, the standard output dataset, is sent to the interactive 
terminal. User logfile messages are also sent to the interactive 
terminal. 



JOB LOGFILE AND ACCOUNTING INFORMATION 



For each job run, the system produces a logfile — an abbreviated history 
of the progress of the job through the system. The logfile for a job 
appears at the end of the job output. Each job control statement is 
listed sequentially, followed by any messages associated with the job 
step. Clock time, accumulated CPU time, and COS information are also 



Part 1 
SR-0011 3-10 



given for each job step. A logfile usually consists of the items 
illustrated in figure 3-3. Item 6 illustrates the accounting information 
given to the user. 



© 
© 



First header line ; Installation-defined message, usually 
identifying the site and date the job was run. 

Second header line ; Installation-defined message, usually 
identifying the operating system, its current revision level, and 
the date of the last revision. 
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03/07/83 - The current COS on SN27 is 03/03. This system was brought up 
/"T\ at 1000, 03/07. 
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CRAY-1 SERIAL 27/4 
CRAY OPERATING SYSTEM 



CRI - MENDOTA HEIGHTS, MINN. 03/23/83 



COS 1.12 ASSEMBLY DATE 03/03/83 



JOB,JN=SAMPJOB,US=PROJECT2013,MFL=2B000,T= 
ACCOUNT, AC=. 
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GENERATE A PERMANENT DATASET 
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COPYF (0=PERMDS ) 
FT048 - COPY OF 
COPYF, 0=PERMDS. 

FT048 - COPY OF 72 RECORDS 
SAVE(DN=PERMDS,ID=P2013) 
PDN = PERMDS 

COMPLETE 



CSP 

CSP 

CSP 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 



VVPD000 - SAVE 
EXIT. 
END OF JOB 



9 RECORDS 



ID 



1 FILES COMPLETED 



1 FILES COMPLETED 



1 US = PROJECT2013 







JOB NAME - 

USER NUMBER - 

TIME EXECUTING IN CPU - 

TIME WAITING TO EXECUTE - 

TIME WAITING FOR I/O - 

TIME WAITING IN INPUT QUEUE - 

MEMORY * CPU TIME (MWDS*SEC) - 

MEMORY * I/O WAIT TIME (MWDS*SEC) - 

MINIMUM JOB SIZE (WORDS) - 

MAXIMUM JOB SIZE (WORDS) - 

MINIMUM FL (WORDS) - 

MAXIMUM FL (WORDS) - 

MINIMUM JTA (WORDS) - 

MAXIMUM JTA (WORDS) - 

DISK SECTORS MOVED - 

USER I/O REQUESTS - 

OPEN CALLS - 

CLOSE CALLS - 

MEMORY RESIDENT DATASETS - 

TEMPORARY DATASET SECTORS USED - 

PERMANENT DATASET SECTORS ACCESSED - 

PERMANENT DATASET SECTORS SAVED - 

SECTORS RECEIVED FROM FRONT END - 

SECTORS QUEUED TO FRONT END - 



SAMP JOB 
PROJECT2013 
0000:00:00.0046 
0000:00:00.2999 
0000:00:01.6256 
0000:00:00.0624 
0.11527 
47.48925 
13312 
30208 
10240 
27136 
3072 
3072 
96 
18 
11 
9 


20 
1 





Figure 3-3. Example of a job logfile 



© 



Columns ; The leftmost column identifies the wallclock time for 
each job step and the middle column identifies the accumulated CPU 
time for the job. The rightmost column identifies a system module 
or the user as the originator of the message. All times are in 
decimal. Entries commonly noted include the following: 
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CSP Control Statement Processor 

PDM Permanent Dataset Manager 

EXP Exchange Processor 

ABORT Abort Message 

USER Program in user field 

Control statements ; Control statements are listed in the logfile 
as they are processed unless requested otherwise with the ECHO 
statement described in part 2, section 1 of this manual. When the 
job terminates, the last control statement processed that may be 
echoed is the last control statement printed. Control statements 
are not listed if the JCL message class (see the ECHO control 
statement) is disabled. 



© 



5 J Logfile messages : Any messages related to control statement 
processing are shown below the statement. 



© 



6 J Accounting information : When a job reaches completion, COS writes 
a summary of basic accounting data onto the logfile for the job. 
All times given are in hours, minutes, and seconds (to the nearest 
ten-thousandth of a second) . The following accounting information 
is provided (in decimal) : 

• Job name and user number 

• CPU time used by the job 

• Time waiting to execute; includes time waiting for the CPU, 
memory, operator suspension, and recovery. 

• Time waiting for I/O 

• Time waiting in input queue 

• Memory usage based on the execution and I/O wait time in million 
word- seconds 

• Minimum and maximum job size including Job Table Area (JTA) 
(words) 

• Minimum and maximum field length used (words) 

• Minimum and maximum JTA used (words) 

• Number of 512-word disk blocks (sectors) moved 

• Number of user I/O requests made by the job 

• Open and close calls 

• Memory-resident datasets 
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• Number of 512-word disk blocks (sectors) used for temporary 
datasets 

• Number of 512-word disk blocks (sectors) accessed and saved for 
permanent datasets 

• Number of 512-word disk blocks (sectors) received from and 
queued to the front end 

• Number of tape devices reserved; message issued only if magnetic 
tape datasets have been processed. 

• Number of tape volumes mounted; message issued only if magnetic 
tape datasets have been processed. 

• Amount of tape data moved, expressed as a multiple of 512 words; 
message issued only if magnetic tape datasets have been 
processed. Each disk sector consists of 512 words, and in COS 
blocked format each block consists of 512 words. 

• Number of tape blocks moved; message issued only if magnetic 
tape datasets have been processed. 

System Bulletin ; The system bulletin allows the installation to 
print messages in the logfile, usually about the status of the 
system environment. It is an installation-maintained message 
dataset. 
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JOB CONTROL LANGUAGE 



The job control language of the Cray Operating System (COS) allows the 
user to present a job to the Cray Computer System, define and control 
execution of programs, and manipulate datasets. 

The job control language is composed of control statements with each 
control statement containing information for a job step. COS initially 
creates a control statement dataset, SCS, to hold job control 
statements. Additional control statement datasets can be created via 
procedure definition or the CALL control statement (see part 2, section 
of this manual) . 

The syntax of a control statement is: 



verb 


sep 1 


param-^ 


sep 2 


par am 2 


• • • 


sep n 


param n 


term 


comments 



All control statements must adhere to a set of general syntax rules. 
Every control statement consists of a verb and a terminator (term) as a 
minimum, except for the comment control statement (*) which does not 
require a terminator. Additionally, most control statements require 
parameters (paramo) and separators (sepi) between the verb and the 
terminator. The maximum number of parameters (zero, one, or more) 
depends on the verb. 

The continuation separator (the caret symbol) allows a control statement 
to consist of more than one line image (80 characters). The JOB, 
ACCOUNT, DUMPJOB, EXIT, and comment control statements cannot be 
continued. All other control statements can have any number of 
continuation card images, subject to restriction by the verb. A caret 
occurring within a literal string has no special significance. 

A comment is an optional annotation to a control statement and can be a 
string of any ASCII graphic characters. The comment follows the line 
image terminator. The control statement interpreter ignores comments. 
All comments appear in the logfile unless suppressed by the ECHO control 
statement . 



Blanks are ignored unless they are embedded in a literal string, 
cannot precede the verb on the JOB control statement. 



Blanks 
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SYNTAX VIOLATIONS 

COS notes syntax violations in the system and user logf iles. If the JOB 
control statement is in error, processing of the job terminates 
immediately. If accounting is mandatory, ACCOUNT statement errors also 
cause job termination. All other syntax errors cause a job step abort 
condition, which causes the system to search for an EXIT control 
statement. A successful search resumes control statement processing with 
the job step following EXIT. If no such job step exists or if an EXIT 
statement is not found, the job is terminated. Job step abort can also 
direct control to a user-specified routine (see exit processing and 
reprieve processing in part 1, section 3) . 



VERBS 

A control statement verb is the first nonblank field of a control 
statement specifying the action to be taken by COS during control 
statement processing. COS recognizes three types of control statement 
verbs: system verbs, dataset name verbs (local and system) , and 
library-defined verbs. A control statement verb cannot be continued 
across a card boundary. 

When COS encounters a verb in a control statement file, it searches for a 
match to that verb in the following order : 

1 • System verbs 

2. Local dataset name verbs 

3. Library-defined verbs 

4. System dataset name verbs 

COS first searches the list of system verbs for a match. If the verb is 
not a system verb, COS searches for a local dataset name that might match 
the verb. If the verb is not the name of a local dataset, COS searches 
each library in the library searchlist for a match. If it does not find 
a library entry that matches the verb, it searches the System Directory 
Table (SDR) for a matching system dataset name. If a match for the verb 
is not found under any of these categories, COS issues a control 
statement error and aborts the job step. 
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SYSTEM VERBS 

A system verb consists of an alphabetic character which can be followed 
by one through seven alphanumeric characters. The verb requests that 
COS perform the indicated function. The system verbs are: 



* 


DISPOSE 


EXITROC 


LOOP 


PRINT 


SAVE 


ACCESS 


ECHO 


EXITLOOP 


MEMORY 


PROC 


SET 


ACQUIRE 


ELSE 


FETCH 


MODE 


RELEASE 


SIMABORT 


ADJUST 


ELSE IF 


IF 


MODIFY 


RERUN 


SUBMIT 


ASSIGN 


ENDIF 


10 AREA 


NORERUN 


RETURN 


SWITCH 


CALL 


ENDLOOP 


JOB 


OPTION 


REWIND 




DELETE 


ENDPROC 


LIBRARY 


PERMIT 


ROLLJOB 





The SIMABORT control statement is described in the COS Simulator (CSIM) 
Reference Manual, CRI publication SR-0073. 



LOCAL DATASET NAME VERBS 

A verb that is the name of a local dataset consists of an alphabetic 
character followed by one through six alphanumeric characters. This 
verb requests that COS load and execute an absolute binary program from 
the first record of the named dataset. If the user job has a dataset 
with the indicated name, COS loads and executes the program from that 
dataset. 



LIBRARY-DEFINED VERBS 

A library-defined verb consists of one through eight characters. The 
library-defined verb is either a program or procedure definition (see 
part 3, section 1 of this manual) residing in a library that is a part of 
the current library searohlist. (The library searchlist defines the 
library and the order in which the libraries are searched by COS. This 
order can be specified with the LIBRARY statement described in part 2, 
section 2.) A program in a library is an absolute binary program to be 
loaded and executed. A procedure definition is a group of control 
statements and/or data to be processed (see part 3, section 1). 



t Alphabetic characters include $, %, @, and the 26 uppercase letters A 
through Z. Alphanumeric characters include all the alphabetic 
characters and the digits through 9. 

tt Deferred implementation 
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SYSTEM DATASET NAME VERBS 

COS searches for a verb that is the name of a system-defined dataset in 
the System Directory Table (SDR) . A system-defined dataset name verb 
consists of an alphabetic character which can be followed by one through 
six alphanumeric characters. The System Directory Table is a list of 
common language processors and utilities known to the system and made 
available to users at startup. The name of the program (for example, 
CAL, CFT, or DUMP) is also the name of the dataset containing the 
absolute binary of the program. The exact list of system dataset name 
verbs is site dependent. 



SEPARATORS 

A separator is a character used as a delimiter in a control statement. 
It separates the verb from the first parameter, separates parameters from 
one another, delimits subparameters, terminates verbs and parameters, and 
separates a keyword from its value in parameters having keyword form. 

The control statement separators allowed by COS are given in table 4-1. 



PARAMETERS 

A parameter is a control statement argument, whose exact requirements 
are defined by the control statement verb. Parameters are used in 
control statements to specify information to be used by the verb-defined 
process. Parameters that can be used with COS control statements are 
either positional or keyword. For certain verbs, a parameter value can 
be an expression. Detailed information on the use of expressions is 
presented later in this section. Parameters are separated by commas. 



POSITIONAL PARAMETERS 

A positional parameter has a precise position relative to the separators 
in the control statement. Even a null positional parameter must be 
delimited from the control statement verb or other parameters by a 
separator . 



Alphabetic characters include $, %, @, and the 26 uppercase letters A 
through Z. Alphanumeric characters include all the alphabetic 
characters and the digits through 9. 
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Table 4-1. Control statement separators 



Function 


Character 


Examples 


Initial separator (comma or open 
parenthesis)' - Separates the 
verb from the first parameter 


( 


VERB, parameter. 
VERB {parameter) 




Statement terminator (period if 
initial separator is comma; close 
parenthesis if initial separator 
is open parenthesis)^ - Signifies 
end of control statement 


) 


VERB. 

VERB, parameter. 

VERB {parameter) 




Parameter separator (comma) - 
Indicates the end of one parameter 
and the beginning of the next 


r 


VERB {parameter, parameter) 


Equivalence separator (equal sign) - 
Delimits a parameter keyword from the 
first parameter value for that key- 
word. Adjacent equivalence separa- 
tors are illegal. 




VERB (keyword=value) 




Concatenation separator (colon) - 
Separates multiple parameter values 
from each other 


: 


VERB {keyword=value^_ 


-.value-}) 


Continuation character (caret) - 
Indicates that the control statement 
consists of more than one 80-character 
card; may appear anywhere after the 
initial separator 




VERB ( . . .parameters, 
parameters) 




Literal delimiters (apostrophes) - 
Identify the beginning and end of a 
literal string 


t i 


VERB{... 'string' ...) 




Parenthesis delimiters (open and close 
parentheses) - Indicate a group of 
characters to be treated as one value 


(...) 


VERB (keyword= (value 


value) 



By convention in this manual, the comma and period are used as 
initial and terminator separators for all control statements except 
for the JCL block control statements (procedure definition, iterative, 
and conditional) where paired parentheses are conventional. 



SR-0011 



Part 1 
4-5 



The formats for a positional parameter follow: 




Each value-i is a string of alphanumeric characters, a literal string, or 
a null string. All positional parameters are required to be represented 
by at least one value, although the value can be null. Rules for strings 
are given in part 3, section 2. 



Examples of positional parameters: 

. ..,ABCDE,. .. Parameter value is ABCDE. 

...,,... The adjacent parameter separators indicate a null 
positional parameter. 



• • • $ i X Z IT £, Z C 3 f m m • 

VERB() or VERB,. 



The parameter consists of multiple values. 
Positional parameter 1 is null 



KEYWORD PARAMETERS 

A keyword parameter is identified by its form rather than by its position 
in the control statement. The keyword is a string of one to eight 
alphanumeric characters uniquely identifying the parameter. Parameters 
of this type can occur in any order but must be placed after all of the 
positional parameters for the control statement, or they can be omitted. 



The formats of keyword parameters are: 



keyword 

keyword=value 

keyword=valuei:value 2 : . . . :value n 



keyword is an alphanumeric string that depends on the requirements of the 
verb, and value^ is the value associated with the keyword. A keyword 
parameter can occur anywhere in the control statement after all 
positional parameters are specified. Whether or not a keyword parameter 
is required depends on the verb's requirements. If the keyword is not 
included in the control statement, a default value can be assigned. 
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Examples of keyword parameters: 

. . . ,DN=FILE1, . .. Parameter consists of keyword and value. 

...,UQ f ... Parameter consists of keyword only. 



,DN=FILE1:FILE2:FILE3, ., 



,DN=, 



. . ,DN=A: : :B,. . . 



Parameter consists of keyword and list of 
values. 

Null parameter value, as if omitted from 
the statement 

A, B, and two null parameter values are 
listed. 



The parameter associated with a keyword may be defined as a secure 
parameter. Every secure parameter is edited out of the statement before 
it is echoed to the user logf ile. When a keyword is secure, all that 
appears in the user's logf ile is the keyword and the = sign, followed by 
the next delimiter. Secure parameters are defined when calling GETPARAM 
as described in the Library Reference Manual, CRI publication SR-0014. 



PARAMETER INTERPRETATION 

The decoding (cracking) of control statement parameters is normally 
performed by the routines $CCS and GETPARAM, as described in the Library 
Reference Manual, CRI publication SR-0014. Parameter interpretation is 
performed by the particular program or utility that calls $CCS or 
GETPARAM. 



CONVENTIONS 

The following conventions are used in this manual. 
Convention Description 



Italics 



Define generic terms representing the words or 
symbols to be supplied by the user 



[ ] Brackets Enclose optional portions of a command format 

i ' Braces Enclose alternate choices, one of which must be used 
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LIBRARIES 



Job control statements, programs, and compiled subprograms are maintained 
in libraries. The following types of libraries are available on the Cray 
Operating system: 

• Procedure libraries 

• Program libraries 

• Object code libraries 

The CALL and LIBRARY control statements (see part 2, section 2 of this 
manual) refer to procedure libraries; UPDATE (see the UPDATE Reference 
Manual, CRI publication SR-0013) maintains program libraries; BUILD (see 
part 2, section 10 of this manual) maintains object code and procedure 
libraries. The LIB and NOLIB parameters of the LDR control statement 
(see part 2, section 9 of this manual) refer to object code. 



PROCEDURE LIBRARY 

A procedure library is created by the in-line procedure definition 
process described in part 3, section 1 of this manual. After creation, 
procedure libraries are made available for use by the LIBRARY control 
statement (see part 2, section 2 of this manual) . 

A procedure library is made up of procedures which are a sequence of 
control statements and/or data saved for processing at a later time. 
Procedures are described in part 3, section 1 of this manual. 



PROGRAM LIBRARY 

A program library is a means of maintaining programs and other data on 
datasets. These datasets are created and maintained by the UPDATE 
utility described in the UPDATE Reference Manual, CRI publication 
SR-0013. A program library (PL) consists of one or more specially 
formatted card image decks, each separated by an end-of-file record. 
These decks can be programs, portions of programs, input data for 
programs, or even job control statements. See the UPDATE Reference 
Manual for full information on using program libraries. 
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OBJECT CODE LIBRARIES 

Object code libraries are termed library datasets or simply libraries . A 
library dataset is a dataset containing a program file followed by a 
directory file. Library datasets are designed primarily to provide the 
Relocatable Loader (see part 2, section 9 of this manual) with a means of 
rapidly locating and accessing program modules. Library datasets are 
created and maintained by the BUILD utility as described in part 2, 
section 10 of this manual. Any library dataset can be inspected and 
described by ITEMIZE. See part 2, section 8 for more information on 
ITEMIZE. 
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PART 2 
JOB CONTROL STATEMENTS 



INTRODUCTION 



Job control statements perform the following functions: 

• Identify a job to the system 

• Define operating characteristics for the job 

• Manipulate datasets 

• Call for the loading and execution of user programs 

• Call COS programs that perform utility functions for the user 

• Define and manipulate other control statements 

The first file of a job dataset contains control statements that are 
read, interpreted, and processed one at a time. The sequential 
processing of control statements determines the job flow through the 
operating system. See part 1, section 3 for a general description of 
job flow. Sequential processing of control statements can be altered by 
exit or reprieve processing, or by control statement structures 
described in part 3. 

Information on the general syntax rules and conventions for control 
statements is presented in part 1, section 4. This part describes COS 
control statements individually and gives examples in some cases. The 
control statements are described in the the following categories: 

• Job definition 

• Dataset definition and control 

• Permanent dataset management 

• Dataset staging control 

• Permanent dataset utilities 

• Local dataset utilities 

• Analytical aids 

• Executable program creation 

• Object library management 
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JOB DEFINITION 



Several control statements allow the user to specify job processing 
requirements. Control statements defining a job and its operating 
characteristics to the operating system include the following. 



Verb 
JOB 

MODE 
EXIT 



MEMORY 



SWITCH 



Function 

Introduces the job to the operating system and 
defines characteristics such as size f time limit, and 
priority levels 

Sets or clears mode bits in the job's Exchange Package 

Indicates the point in a series of control statements 
at which processing of control statements resumes 
following a job step abort from a program or 
indicates the end of control statement processing 

Requests a new field length and/or mode of field 
length reduction 



Turns on or turn off pseudo sense switches 

* Annotates control statements with comments 

RERUN, NORERUN Controls job rerunnability 

IOAREA, Denies or allows access to the job's I/O area, the 
upper (high-address) portion of user memory that 
contains tables and buffers managed by the system I/O 
library routines 

CALL, RETURN Allows the use of alternate control statement files 

ACCOUNT Validates the job's account number, user number, and 
optional passwords 



CHARGES 
ROLLJOB 
SET 

ECHO 



Obtains partial or total resource reporting for a job 

Protects a job by writing it to disk 

Changes the value of a job control language (JCL) 
symbolic variable 

Controls types of messages written to the job's 
log file 
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Verb 



Function 



LIBRARY 



Specifies the datasets to be searched, when looking 
for defined procedures, during job processing. 
LIBRARY also specifies the order in which to perform 
the search. 



OPTION Specifies user-defined options, such as the format of 
the job's listing and the amount of dataset 
accounting statistics produced 

The job definition and control statements are fully described in part 2, 
section 2. 



DATASET DEFINITION AND CONTROL 



Datasets can be defined and managed by the user with the following 
dataset control statements: ASSIGN, ACCESS, and RELEASE. 



Verb 



Function 



ASSIGN 



Defines characteristics for datasets, such as the 
amount of user memory to allocate for the dataset' s 
I/O buffer. ASSIGN also can be used to create a mass 
storage dataset. ACCESS must first be used to create 
a tape dataset. 



RELEASE 



Relinquishes access to the named dataset for the job 



ASSIGN and RELEASE are fully defined in part 2, section 3. ACCESS is 
described later in this section under Permanent Dataset Management 
because it is primarily used in managing permanent datasets. 



PERMANENT DATASET MANAGEMENT 

Control statements for managing permanent datasets provide for creating, 
protecting, and accessing datasets assigned permanently to mass storage 
or magnetic tape. Such datasets cannot be destroyed by normal system 
activity or engineering maintenance. 

Front-end computer systems cannot directly affect Cray-resident 
permanent datasets, since permanent dataset management is handled 
entirely by COS. However, permanent magnetic tape dataset management 
can optionally be coordinated with a front-end computer system. 
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Users can manage user permanent datasets only; system permanent datasets 
cannot be managed (modified or deleted) by the user. (See part 1, 
section 2 for a description of the types of datasets.) 

The control statements available for user permanent mass storage and 
magnetic tape dataset management are shown in table 1-1. Actual 
processing of these requests depends upon the medium on which the 
dataset resides. Mass storage datasets are controlled by the COS system 
task called the Permanent Dataset Manager (PDM) . Magnetic tape datasets 
are controlled by a system task called the Tape Queue Manager (TQM) . 
Both of these system tasks (PDM and TQM) have mechanisms for retaining 
the characteristic information about the dataset. Information for mass 
storage datasets is retained in the Central Memory-resident Dataset 
Catalog (DSC) . Magnetic tape datasets can have characteristic 
information retained on a front -end computer system. 

The permanent dataset management control statements are fully described 
in part 2, section 4. 



MASS STORAGE DATASET ATTRIBUTES 

Every mass storage permanent dataset has several attributes associated 
with it. These attributes are: 

• Read, write, and maintenance permission control words, 

• Public access mode, 

• Public access tracking, 

• Permits, 

• Text, and 

• Notes 

Permission control words 

A permission control word is a password that must be supplied to gain 
access to a particular permanent dataset. Permanent datasets are not 
required to have a permission control word, but if a permission control 
word is specified for the mode of dataset access desired (read, write, 
maintenance) , the control word must be specified to gain access to the 
named dataset. If more than one mode of access is desired (for example, 
both read and write) , all appropriate control words must be supplied. 
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Table 1-1. Permanent dataset management control statements 
for each medium 



Verb 


Mass storage 


Magnetic tape 


SAVE 


Enters a dataset' s 


Supplies to a front-end 




identification and location 


computer system the 




in a system-maintained 


characteristic information 




Dataset Catalog. Datasets 


about a dataset for its 




recorded in the Dataset 


retention 




Catalog via a user SAVE 






request are user permanent 






datasets and are recoverable 






at deadstart. 




ACCESS 


Assigns (makes local) a user 


Assigns an existing tape 




permanent dataset to the 


dataset to the job or 




requesting job, with the 


defines a NEW- type tape 




requested and/or allowable 


dataset that will be created 




modes (execute, read, 


by the job. Also optionally, 




write, maintenance) 


defines the front -end computer 
system that will be the 
central point for servicing 
that dataset. 


DELETE 


Removes the definition of 


Requests the front-end 




a user permanent dataset 


computer system servicing 




from the Dataset Catalog 


the dataset to remove 




(DSC) . It is possible 


(delete) any information 




to delete a dataset' s 


concerning the dataset 




contents and have its 






attributes retained by 






the system. 




MODIFY 


Changes the characteristic 
information for an existing 
user permanent dataset 


Not applicable 


ADJUST 


Records the change in any of 
the size or allocation 
information for a dataset 
that might have contracted 
or expanded 


Not applicable 


PERMIT 


Explicitly grants or denies 
specified users or groups 
of users access to a 
permanent dataset 


Not applicable 
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Public access mode attribute 

If all users are to be allowed some kind of access to a permanent 
dataset, that dataset must have a public access mode defined. The 
public access mode is the type of access, as a minimum, all users can 
have to the permanent dataset. Users can be allowed read, write, and/or 
maintenance mode access to the dataset. Users can be restricted to only 
executing the dataset; the public access mode can alternatively be NONE, 
signifying that public access is not permitted. 



Public access tracking attribute 

Public access tracking is a facility that can be turned on or off. A 
record can be kept of every user who accesses a public dataset. See 
Dataset Use Tracking later in this section for more details on the 
public access tracking mechanism. 



Permits attribute 

User permanent mass storage datasets can have a list of alternate users 
of the dataset and in what mode or modes each alternate user can access 
the dataset. Each element of the list is known as apermit and names 
a specific alternate user and that user's allowed mode of dataset 
access. Permits are described more fully under Access Mode later in 
this section. 



Text attribute 

text is a character string to be passed to a front-end computer system 
when requesting transfer of the dataset to or from Cray mass storage. 
Text is more fully described under Dataset Staging Control later in this 
section. 



Notes attribute 

notes is a string of up to 480 characters associated with a permanent 
dataset. There is no restriction on what notes contains. When 
notes is listed using the AUDIT utility (see Permanent Dataset 
Utilities later in this section) , the caret symbol is interpreted as an 
end-of-line signal and AUDIT advances to a new line when listing the 
dataset notes, notes can contain such information as dataset 
structure, usage instructions, or history. For example, if several 
versions of a program exist as different permanent datasets, the notes 
could identify the purpose, difference, and origin of each dataset. 
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ESTABLISHING ATTRIBUTES FOR MASS STORAGE DATASETS 

Mass storage permanent dataset attributes are established at dataset 
creation time, though they can be later modified (or added to in the 
case of permits) . Attribute establishment depends on whether a dataset 
with the same name (PDN) , additional identification (ID) , and ownership 
already exists. 

Supplying the entire set of attributes every time a new permanent 
dataset is created, that is r when no permanent dataset with the same 
PDN, ID, and ownership currently exists, can become quite tedious, 
especially if a long list of permits must be established. Instead, the 
dataset creator can supply an attributes dataset. 



Existing permanent dataset 

If a permanent dataset with the requested PDN, ID, and ownership already 
exists, the current dataset' s permission control words, public access 
mode, public access tracking, and permit list are set to the 
corresponding attributes of the permanent dataset with the highest 
existing edition number (ED) and identical PDN, ID, and ownership. 

The text attribute is also copied from the highest existing edition 
unless otherwise specified; the notes attribute is not copied. 

The discussion of creating a new edition of an existing permanent 
dataset applies to datasets created by SAVE or PDSLOAD (see Permanent 
Dataset Utilities later in this section for information on PDSLOAD) . If 
MODIFY is used to create a new edition of an existing dataset (by 
changing the PDN or ID) , any dataset attributes not explicitly modified 
remain unchanged. Thus, it is possible, though not recommended, for 
different permanent datasets with the same PDN, ID, and ownership to 
have different attributes. 



New permanent dataset 

Using SAVE or ACQUIRE when no permanent dataset currently exists with 
the same PDN, ID, and ownership causes a new permanent dataset to be 
created. 

All permanent dataset attributes can be established for a new permanent 
dataset; no attribute is associated with any other dataset. For 
example, if the new permanent dataset is to have a read permission 
control word, then the control word must be supplied. If a list of 
permits is needed, then the list must be supplied. Establishing an 
attributes dataset provides a convenient way of supplying a list of 
permits as described below. 
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The attributes dataset 

An attributes dataset is an existing permanent mass storage dataset 
from which any (or all) permanent dataset attributes can be copied. The 
actual dataset content is ignored; the attributes are copied from the 
dataset' s catalog entry. The attributes dataset can even be partially 
deleted (see Dataset Staging Control later in this section for a 
discussion of partial dataset deletion) . The attributes dataset must be 
local to the job referencing it. 

The attributes dataset is referenced with the ADN parameter on the SAVE 
or ACQUIRE control statement. When the attributes dataset is 
referenced, all desired attributes (such as permission control words and 
the public access mode) are copied from the attributes dataset and used 
in establishing the attributes of the current dataset. Any attribute 
explicitly specified on the SAVE or ACQUIRE control statement is used 
instead of the attributes dataset' s attribute. Examples of attribute 
dataset use are included at the end of part 2, section 4. 

An attributes dataset can also be used with the PERMIT control 
statement, although it is used slightly differently. When an attributes 
dataset is used with PERMIT, the entire permit list (but no other 
attribute) is copied from the attributes dataset and added to the permit 
list established (or being established) for the current dataset. 

For example, suppose the same permit list is being used for several 
different datasets. A single permanent dataset can be created and the 
list of permits established. Then whenever a new dataset is created, 
the original dataset can be accessed and used as an attributes dataset. 
The new dataset creator need not even know what permits are being 
established. 



PROTECTING AND ACCESSING MASS STORAGE DATASETS 

Access of mass storage datasets can be restricted on two levels: 

• Which users can access the dataset (privacy) 

• What type of access is allowed (access mode) 

The mass storage dataset protection system has two other dataset 
management aspects: 

• Dataset use tracking 

• Attribute association 
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Privacy 

Mass storage permanent datasets fall into three categories, depending on 
which users can access the permanent dataset. 

• Private datasets are accessible only to the dataset owner. 

• Semiprivate datasets are accessible to the dataset owner and to 
a specific group of other users. 

• Public datasets are accessible to all users. 

New mass storage datasets are either public or private (not semiprivate) 
by default. Contact your Cray Research site analyst for the default 
value at your site. A new dataset can be explicitly declared as either 
public or private with the PAM (public access mode) parameter on the 
SAVE control statement. (See part 2, section 4.) 



Access mode 

In addition to establishing which users may access a dataset, the owner 
must establish what mode of access alternate users are allowed; that is, 
whether users other than the dataset owner may execute, read, write, or 
maintain the permanent dataset. Specifying the mode of alternate access 
depends upon what category of user is being granted the access. The 
three categories of users are: 

• The dataset owner. The dataset owner is allowed all modes of 
access. 

• Specific alternate users. Specific alternate users are named 
with the USER parameter of the PERMIT control statement (see part 
2, section 4); the alternate user's allowed mode of access is 
declared with the AM (access mode) parameter of the same PERMIT 
control statement. Multiple PERMIT statements can be issued for 
the same permanent dataset to provide a list of alternate users. 
PERMIT can also be used to change or remove the allowed mode of 
access for an alternate user of the dataset. The allowed access 
mode for a specific user is known as a permit. 

• All other users (the public) . All users of a dataset not in the 
two categories above can be allowed (or denied) access to the 
dataset by using the PAM (public access mode) parameter on the 
ACQUIRE (part 2, section 5) , SAVE, or MODIFY control statement 

(see part 2, section 4). The mode of public access to a dataset 
can be changed at any time with the MODIFY control statement. 
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Any mass storage permanent dataset can have a public access mode with 
any combination of permits. If an alternate user desiring access to a 
permanent dataset is allowed both public access and is named in a 
permit, the alternate user is allowed the access named in the permit. 
The permit takes precedence over the public access mode. 

Such a combination of public and permitted access is often desirable. 
For example, suppose dataset FROG is to be used (executed as a program) 
by many groups of users, maintained by the dataset owner, and backed up 
or restored as needed by another user. Then, the dataset should have a 
public access mode of execute only and a permit of maintenance mode 
access for the alternate user who does dataset backup and restoration. 

Note that all users, including the owner, must correctly specify any 
existing permission control words corresponding to the mode of access 
desired. For example, suppose dataset BIG has a public access mode of 
READ and a read password of README. Any user desiring to read the 
dataset must supply the read password (README) to gain access to the 
dataset. An exception occurs if the permanent dataset utilities are 
used. For more information, refer to part 2, section 6. 



Dataset use tracking 

The total access count and date/time of last access are recorded for 
each dataset in the Dataset Catalog (DSC) . Access tracking capabilities 
include recording who accessed the dataset, how many times, and the 
date/time of last access. The permit mechanism described earlier in 
this section provides access tracking whenever a permit is issued for a 
user. A dataset that allows public access can also be tracked. 
However, the owner must explicitly state that public access tracking is 
required with the TA (track accesses) parameter on the ACQUIRE, SAVE, or 
MODIFY control statement; the system does not normally provide it. 



Attribute association 

The system allows permanent datasets having the same permanent dataset 
name (PDN) and additional identification (ID) to be distinguished by an 
edition number (ED). That is, there can be several datasets with 
different edition numbers that have the same PDN, ID, and ownership 
value. 

A user permanent dataset is uniquely identified by the PDN, ID, ED and 
ownership value. The ownership value recorded in the DSC when a 
dataset is made permanent is normally equal to the user number as 
specified on the ACCOUNT or JOB control statement. Specific 
installations can choose to define dataset ownership as the account 
number rather than the user number. Contact your Cray Research site 
analyst to find out which type of ownership value is used. 
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Permanent mass storage datasets with the same PDN, ID, and ownership are 
assumed to be closely related. Therefore, most permanent dataset 
attributes are the same for all editions of the permanent dataset. The 
read, write, and maintenance permission control words, public access 
mode, public access tracking, and permits are the same for all datasets 
with the same PDN, ID, and ownership. 

The text attribute is treated slightly differently. Any text supplied 
when the dataset is created is kept as a dataset attribute; if no text 
is supplied, the text attribute from the highest existing edition of the 
permanent dataset, if any, is used. 

The notes attribute is treated similarly to text except that notes are 
assumed to be different for each dataset edition, notes supplied at 
dataset creation time are used; if no notes are supplied, none are 
used. 

Deleting the data in a permanent dataset while leaving the dataset' s 
name and attributes recorded in the Dataset Catalog (DSC) is possible. 
Such a dataset is referred to as a partially deleted dataset. Partial 
dataset deletion is described under Dataset Staging Control. 



DATASET STAGING CONTROL 

Staging is the process of transferring jobs and data in the form of COS 
datasets from a front-end computer system to Cray mass storage or of 
transferring datasets from Cray mass storage to a front-end computer 
system. Three control statements support staging datasets between COS 
and a front-end system: ACQUIRE, FETCH, and DISPOSE. Another control 
statement, SUBMIT, directs datasets to the COS input queue. 

Verb Function 

ACQUIRE Checks to see if the requested dataset is currently 

permanent on mass storage. If the dataset is already 
permanent, ACQUIRE works exactly like ACCESS 
(described earlier in this section) and allows 
dataset access to the job making the request. 
Alternatively, if the dataset is not mass storage 
resident, ACQUIRE obtains a front-end resident 
dataset, stages it to Cray mass storage, and makes it 
permanent and accessible to the job making the 
request. The dataset is staged from the front -end 
only if it is not already permanent. 

DISPOSE Directs a dataset to the specified queue for staging 
to a front-end system. DISPOSE can also be used to 
release a local dataset or to change dataset 
disposition characteristics. 
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Verb Function 

SUBMIT Directs a dataset on Cray mass storage local to the 
submitting job to the COS input queue 

FETCH Obtains a front-end resident dataset and makes it 
local to the requesting job 

The above control statements are fully described in part 2, section 5. 

DISPOSE is invalid with tape datasets because DISPOSE applies only to 
the staging of datasets from mass storage to a front-end computer system. 

Dataset control information such as save or access codes is usually 
required by a front-end system for management of its own files. Such 
control information can be sent by the Cray system user to the front-end 
system through the use of the text parameter (expressed as TEXT=iea;t) , 
which is a special parameter of the SAVE, MODIFY, ACQUIRE, FETCH, and 
DISPOSE statements. The content of the character string provided with 
the TEXT parameter is defined by the front-end system (see the 
appropriate station reference manual for the use of the TEXT parameter 
at your front-end system) . 

The text information not only provides most of the directives for 
obtaining the dataset from the front-end computer system but can contain 
sensitive or secure information as well. When using the ACQUIRE control 
statement, the staged dataset is recorded in the Dataset Catalog (DSC) 
and thus made permanent. Like any other mass storage permanent dataset, 
the staged dataset' s attributes are recorded and protected as described 
under Protecting and Accessing Mass Storage Datasets, earlier in this 
section. 

The owner of an acquired dataset can provide permission to acquire the 
dataset to other users by specifying a public access mode or by issuing 
permits. The actual dataset (that is, the data) need not reside on mass 
storage for the permissions to be issued. For this reason the text, 
as specified by the owner when the dataset was initially acquired, is 
retained by the system as an attribute. The owner can, at a later date, 
delete the data while still retaining all of the permanent dataset 
attributes. A dataset registered in the DSC in this manner is referred 
to as a partially deleted dataset. 

When an authorized user acquires a partially deleted dataset, the text 
required to obtain the dataset from the front-end computer system is 
retrieved from the Dataset Catalog and sent along with the request. 
Therefore, the user need not specify the text in the ACQUIRE request. 
In fact, if the ACQUIRE is being issued by an alternate user as opposed 
to the owner, any text in the request is ignored. In this manner, the 
owner does not have to disclose the text information to other users. 
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The owner can at any time replace the text via the MODIFY command. 
After a partially deleted permanent dataset has been successfully 
acquired, the data is once again made permanent and is considered 
completely Cray mass storage resident. A subsequent ACQUIRE request, 
since the dataset is mass storage resident, is treated as an ACCESS 
request. Remember that the ACQUIRE request stages a dataset only if it 
is not already permanent on Cray mass storage. 



PERMANENT DATASET UTILITIES 

Three utilities (PDSDUMP, PDSLOAD, and AUDIT) can be used with any mass 
storage permanent datasets available to the user. Datasets processed by 
these utilities need not be local to the user job. The following 
utility routines are provided for mass storage permanent datasets. 



Verb 



Function 



PDSDUMP 



Dumps all specified permanent datasets to a 
user-specified dataset. Input and output datasets 
managed by the operating system can be included in 
the dump. 



PDSLOAD 



Loads permanent datasets that have been dumped by 
PDSDUMP and updates or regenerates the Dataset 
Catalog. Input and output datasets managed by the 
operating system are also loaded via PDSLOAD. 



AUDIT 



Produces a report containing status information for 
each permanent dataset. AUDIT does not include 
system input or output datasets. 



The above control statements are fully described in part 2, section 6. 



LOCAL DATASET UTILITIES 

Utility control statements provide the user with a convenient means of 
copying, positioning, or initializing local datasets. The following 
utilities are available to the user. 



Verb 



Function 



COPYR, COPYF Copies records, files, and datasets, respectively 
COPYD 

SKIPR, SKIPF Skips records, files, and datasets, respectively 
SKIPD 
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Verb 



Function 



REWIND 



Positions a dataset at the beginning of data, that 
is, before the first block control word of the dataset 



WRITEDS 



Initializes a random dataset. WRITEDS can also 
initializes a sequential dataset. 



The above control statements are described in part 2, section 7. 



ANALYTICAL AIDS 



The following control statements provide analytical aids to the 
programmer. 



Verb 



Function 



DUMPJOB, DUMP DUMPJOB and DUMP are generally used together to 

examine the contents of registers and memory as they 
were at a specific time during job processing. 
DUMPJOB captures the information so that DUMP can 
later format selected parts of it. 



DEBUG 



DSDUMP 



Produces a symbolic dump of the same data produced by 
DUMPJOB described above. DEBUG prints out the values 
of symbolic variables defined in the FORTRAN program 
being dumped. 

Dumps all or part of a dataset to another dataset in 
blocked or unblocked format 



COMPARE 
FLODUMP 



Compares two datasets and lists all differences 

Dumps flowtrace tables when a program aborts with 
flowtrace active 



PRINT Writes the value of a JCL expression (as defined in 
part 3, section 1 of this manual) to the logfile 

SYSREF Generates a global cross-reference listing for a 
group of CAL or APML programs 

ITEMIZE Inspects and generates statistics about library 

datasets. Libraries are described in part 1, section 
5 of this manual; library dataset management is 
described under Object Library Management below. 

The above control statements are fully described in part 2, section 8. 
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EXECUTABLE PROGRAM CREATION 

The LDR control statement calls the COS Relocatable Loader into 
execution. This utility prepares programs for execution from 
relocatable modules. A series of relocatable modules is normally 
created when a program is compiled or assembled. Each relocatable 
module normally represents one subroutine of the whole program, or the 
main program itself. Each relocatable module (also known as a module, 
an object module, a relocatable , or a binary) consists of a series 
of tables. The tables contain such information as executable machine 
(program) instructions, references to other modules (such as when one 
subroutine calls another) , and the location of where the main program is 
to start execution. 

Before a collection of relocatable modules (the program) can be 
executed, the collection of modules must be linked together into a 
single module. This single module, the absolute load module, contains 
the main program and a copy of every subroutine called, including ones 
found in the various system libraries. An absolute load module can be 
executed any time without having to be reprocessed by the Relocatable 
Loader. The COS Relocatable Loader executes as a utility program within 
the user field and provides the loading and linking in memory of 
relocatable modules from datasets on mass storage. 

Very large programs might not fit in the available user memory space or 
might not use large portions of memory while other parts of the program 
are in execution. For such programs, the Relocatable Loader includes 
the ability to define and generate overlays — separate modules that the 
user creates and then calls and executes as necessary. 

Executable program creation is fully described in part 2, section 9. 



OBJECT LIBRARY MANAGEMENT 

BUILD, a utility called through the BUILD control statement, creates and 
maintains object libraries. 

Compiled subroutines (relocatable modules) can be collected into 
libraries that can be referred to later when creating a new program. 
COS provides several standard object libraries (see the Library 
Reference Manual, CRI publication SR-0014, for a description of the 
standard library routines available) . 

Any number of object libraries can be created, however, in addition to 
the ones supplied with COS. 
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Library datasets are designed primarily to provide the Relocatable 
Loader (see previous subsection) with a means of rapidly locating and 
accessing program modules. A library dataset is a dataset containing 
a program file followed by a directory file. The program file is 
composed of loader tables for one or more absolute or relocatable 
program modules. The directory file contains an entry for each program 
module . 

BUILD is fully described in part 2, section 10. 
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JOB DEFINITION AND CONTROL 



Several control statements allow the user to specify job processing 
requirements. This section contains the specifications for the following 
control statements used in defining a job and its operating 
characteristics to the operating system. 



JOB 

MODE 

EXIT 

MEMORY 

SWITCH 
* 

NORERUN 

RERUN 

IOAREA 

CALL 

RETURN 

ACCOUNT 

CHARGES 

ROLLJOB 

SET 

ECHO 

LIBRARY 

OPTION 



JOB - JOB IDENTIFICATION 

The JOB control statement defines the job to the operating system. It 
must be the first statement in a control statement file. The JOB control 
statement cannot be continued to subsequent cards. No leading blanks are 
allowed on the JOB statement. JOB is a system verb. 



Format: 



JOB , JN=j'm ,MFL=fl , T=tl , P=p , US=ws , OUA=olm , CL= jan ,gn=mr . 
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Parameters are in keyword form; the only required parameter is JN. 

JN=jn Job name. 1 through 7 alphanumeric characters. This name 
identifies the job and its subsequent output. JN is a 
required parameter. 

MFL=fl f Maximum field length (decimal) allowed the job, in words. 
The job's maximum field length is set to the greater of 
fl, rounded up to the nearest multiple of 512 words, or 
the amount needed to load the Control Statement Processor 
(CSP) . The job is aborted if the maximum field length is 
greater than the system maximum described below. 

If this parameter is omitted, the maximum field length is 
set by the system to a value determined by an installation 
parameter . 

If MFL is present without a value, the field length is the 
system maximum. The system maximum is the smaller of the 
total amount of memory available after the operating system 
is initialized minus the job's JTA size (see part 1, 
section 1) or an installation-defined maximum job field 
length. 

T=tZ Time limit (decimal) in seconds after which the job is 

terminated by the system. If this parameter is omitted, 
the time limit is set to a value determined by an 
installation parameter. If T is present without a value, a 
maximum of 16,777,215 seconds (approximately 194 days) is 
allowed . 

P=p Priority level at which the job enters the system. This 
parameter can assume the values of through 15 decimal. 
If P is 0, the job is not initiated. If omitted, a value 
specified by the installation is assumed. 

US=us User number. 1 through 15 alphanumeric characters. The 
default is no user number. This parameter identifies the 
user submitting the job. Specific usage is installation 
defined. 

OlM=olm Maximum size of $0UT. olm specifies a decimal count of 

512-word blocks. A block holds about 45 print lines. The 
default and maximum values for olm are defined by the 
installation. 



The fl parameter on the JOB statement excludes the job's Job Table 
Area (JTA) ; space for the JTA is added by the system. 
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CL,=j'on Name of the installation-defined job class where this job is 
to be placed. 1 through 7 alphanumeric characters. The job 
is aborted if it does not fit the requirements of the 
indicated class or if the indicated class does not exist. 
The default is no class name. 

gn=nr Type and number of dedicated resources required by a job. 

gn is a generic name of 1 through 8 alphanumeric 
characters (currently required to begin with an 
asterisk) . A generic resource name corresponds to a 
device type. For example, a generic name of *SSD could be 
given to a Solid-state Storage Device. Generic names are 
defined by site administration. COS provides one generic 
name (*TAPE, which refers to a dual density tape unit 
capable of 1600 or 6250 bpi) , but sites may define up to 
16 generic names. Contact your Cray Research site analyst 
for the generic names used at your site. 

nr> is a positive integer and represents the maximum 
amount of the associated resource that may be used 
concurrently during job execution; the default is 0. A 
job is initiated only when the amount of each resource 
reserved is eligible for use. The job is aborted if it 
attempts to access more resources than are reserved with 
the JOB control statement. 



MODE - SET OPERATING MODE 

The MODE control statement allows the user to set or clear mode flags in 
the Exchange Package for the job. MODE is a system verb. 



Format: 



MODE, FI=option , BT=option , 



Parameters are in keyword form. At least one parameter must be 
specified. The parameters are: 

FI=option Floating-point interrupt mode. Option can be either: 

ENABLE Enable floating-point error interrupts; default. 
DISABLE Disable floating-point error interrupts; 
floating-point errors are ignored. 
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BT=option Bidirectional transfer mode. The BT parameter is used 

on CRAY X-MP Series Computer Systems only; it is ignored 
on CRAY-1 systems, option can be either: 

ENABLE Enable bidirectional memory transfers; default. 
DISABLE Disable bidirectional memory transfers; block 

reads and writes are not performed concurrently. 



EXIT - EXIT PROCESSING 

An EXIT control statement indicates the point in the control statement 
file where processing of control statements resumes following a job step 
abort from a program. If no job step abort occurs, the EXIT control 
statement indicates the end of the control statement processing. EXIT 
is a system verb. 



Format : 




Parameters: None 



MEMORY - REQUEST MEMORY CHANGE 

The MEMORY control statement allows the user to request a new field 
length and/or mode of field length reduction. Job memory management is 
further discussed in part 1, section 3. 

MEMORY is a system verb. 



Format: 



MEMORY, FL=/Z. 


f USER) 

'auto}* 



The keywords USER and AUTO are mutually exclusive; at least one of them 
must be specified. 
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Fh=fl Field length, ft specifies the decimal number of words 

of field length to be allocated to the job. If FL is 
specified without a value, the new field length is set to 
the maximum allowed the job. 

USER Field length reduction is managed by the user (user mode) 

AUTO Field length reduction is managed by the system (automatic 
mode) 

The job's field length can be changed by using the FL parameter. The 
field length is set to the larger of the requested amount rounded up to 
the nearest multiple of 512 words or the smallest multiple of 512 
decimal words large enough to contain the user code/data, LFT, DSP and 
buffer areas. Field length management is in user mode for the duration 
of the next job step. 

The management of a job's field length can be changed by using either 
the USER or AUTO parameters. When the USER parameter is specified, the 
job is placed in user mode until a subsequent request is made to return 
it to automatic mode. When the AUTO parameter is specified, the job is 
placed in automatic mode. 

The job step is aborted if completing the request results in a field 
length greater than the maximum allowed the job. The maximum is the 
smaller of the total number of words available to user jobs minus the 
job's JTA or the amount determined by the MFL parameter on the JOB 
statement. 



Examples : 

MEMORY, FL, USER. 

The job's field length is set to the maximum allowed the job and the 
job is placed in user mode until an explicit request is made to 
return it to automatic mode. 

MEMORY, AUTO. 

The job is returned to automatic mode. Its field length is reduced 
at the next job step. 

MEMORY, FL=28988. 

The field length is adjusted. If the job is in user mode by 
explicit user request, no change in mode occurs; otherwise, the job 
is placed in user mode for the duration of the next job step. 
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MEMORY , FL= 2 8 9 8 8 , AUTO . 

The field length is adjusted and the job is placed in user mode for 
the duration of the next job step. After the next job step, the job 
is put in automatic mode. 



SWITCH - SET OR CLEAR SENSE SWITCH 

The SWITCH control statement allows a user to turn on or turn off pseudo 
sense switches. SWITCH is a system verb. 



Format : 



SWITCH, n=x. 



Parameters: 

n Number of switch (1 through 6) to be set or cleared 

x Switch position 

ON Switch n is turned on; set to 1. 
OFF Switch n is turned off; set to 0. 



* - COMMENT STATEMENT 

The comment control statement allows the user to annotate job control 
statements with comments. A terminator is not required on a comment 
control statement. * is a system verb. 



Format : 



comment text 



Parameters: None 



Part 2 
SR-0011 2-6 



NORERUN - CONTROL DETECTION OF NONRERUNNABLE FUNCTIONS 

The NORERUN control statement allows the user to specify whether the 
operating system is to recognize functions that would make a job 
rerunnable. The current rerunnability of the job is not affected. 
NORERUN is a system verb. 



Format; 



NORERUN I, ENABLE 
DISABLE 



The keywords ENABLE and DISABLE are mutually exclusive. The default for 
the system as released is NORERUN, ENABLE; however, this is an 
installation option. 

Selecting ENABLE instructs the system to begin monitoring functions 
performed by the job and to declare the job nonrerunnable if any of the 
nonrerunnable functions are performed. 

Selecting DISABLE instructs the system to stop monitoring functions for 
nonrerunnable operations. If a job has already been declared to be 
nonrerunnable, specifying DISABLE does not make the job rerunnable again. 



RERUN - UNCONDITIONALLY SET JOB RERUNNABILITY 

The RERUN control statement allows the user to unconditionally declare a 
job to be either rerunnable or nonrerunnable. If RERUN is used to 
declare a job rerunnable, the subsequent execution of a nonrerunnable 
function may cause the system to declare the job nonrerunnable, 
depending on whether a NORERUN control statement or macro is also 
present. RERUN is a system verb. 



Format : 



RERUN!, ENABLE I 
1 DISABLE) 



The keywords ENABLE and DISABLE are mutually exclusive. If no parameter 
is specified on the control statement, installation option determines if 
the job is to be rerunnable; the default for the system as released is 
RERUN, ENABLE. 
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If ENABLE is selected, the system is instructed to consider the job to 
be rerunnable, regardless of what functions have been executed 
previously. 

If DISABLE is selected, the system marks the job not rerunnable 
regardless of what functions have been executed previously. 

The RERUN control statement does not affect the monitoring of the user 
job for nonrerunnable functions. 



IOAREA - CONTROL USER'S ACCESS TO I/O AREA 

The IOAREA control statement locks (denies the user access to) or 
unlocks (gives the user access to) that portion of the user field 
containing the user's Dataset Parameter Area (DSP) and I/O buffers. 
This area follows the High Limit Memory address (HLM) of the user 
field. IOAREA is a system verb. 



Format : 



IOAREA 


, L0CK 1. 

'unlock/* 



The keywords LOCK and UNLOCK are mutually exclusive. A parameter must 
be specified on the control statement. When the control statement is 
not used, the user's I/O area is assumed to be unlocked. 

If LOCK is selected, the system sets the limit address to the base of 
the DSPs, thereby denying direct access to the user's DSP area and I/O 
buffers. When the I/O area is locked, the library I/O routines make a 
system request to gain access to the I/O area. Although the system 
request introduces additional overhead in job processing, it should 
prevent accidental destruction of the I/O area. 

If UNLOCK is selected, the system sets the limit address to the value 
specified in JCFL, allowing access to the user's DSP area and I/O 
buffers. 
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CALL - READ CONTROL STATEMENTS FROM ALTERNATE DATASET 

The CALL control statement instructs COS to begin reading control 
statements from the first file of the indicated dataset. CALL can 
appear anywhere in the control statement file. Nesting of CALL 
statements to seven levels is allowed. COS reads and processes the 
control statements from the indicated dataset until it encounters an 
end-of-file or a RETURN statement. Control then reverts to the 
previous control statement dataset; the named dataset is closed before 
the invocation of the procedure. The CALL statement can also specify 
values to be substituted in the procedure body. CALL is a system verb. 



Format : 



CALL,DN=tfa,CNS. 



Parameters are in keyword form. 

DH=dn Name of dataset from which to begin reading control 

statements. This is a required parameter. 

CNS Crack next statement. If specified, the control 
statement that follows is a procedure calling 
statement containing parameters for procedure string 
substitution. The format of the procedure calling 
statement depends upon the format of the prototype 
statement. The prototype statement format is described 
in part 3, section 4. If CNS is omitted, no 
substitution is performed. 



RETURN - RETURN CONTROL TO CALLER 

The RETURN control statement returns control to the caller. The 
caller can be a procedure or the job's control statement file. 
Processing resumes with the caller's next control statement. A RETURN 
control statement can be embedded anywhere within the called 
procedure. However, a RETURN control statement need not be placed at 
the end of the procedure because an end-of-file record is interpreted 
as the control statement sequence of an EXIT, RETURN, and 
RETURN, ABORT. A RETURN encountered in the primary control statement 
file is ignored. RETURN is a system verb. 
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Format: 




Parameter : 
ABORT 



After returning to the previous control statement level, 
ABORT causes COS to issue a job step abort. ABORT is an 
optional parameter. 



ACCOUNT - VALIDATE USER NUMBER AND ACCOUNT 

The ACCOUNT control statement validates the job's user number, user 
password, account number, and account password. A job is processed 
only if the user number/password pair and the account number /pas sword 
pair (if specified) are valid. 

The ACCOUNT statement declares the user's account and charge numbers 
to COS. It must immediately follow the JOB control statement if the 
installation has defined accounting or security as mandatory. Only 
one ACCOUNT statement is allowed per job. ACCOUNT is a system verb. 

If the job is interactive, and accounting is mandatory, the ACCOUNT 
statment must be the first statement entered in a session. If it is 
not, a prompt is issued to the terminal requesting the ACCOUNT 
statement. A similar prompt is issued for syntax errors made on the 
ACCOUNT statement. 



NOTE 

The ACCOUNT control statement parameters do not appear 
with the ACCOUNT control statement in the job logfile. 



Format : 



ACCOUNT , AC=a<3 , PW=pW , NPW=npW , US=US , UPW=wpW , NUPW=ttupW . 
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Parameters are in keyword form. The only required parameter is AC; the 
installation defines whether a password is needed. 

AC=ac Account number. 1 through 15 alphanumeric characters 

assigned to the user. This number identifies the user for 
accounting purposes, and is a required parameter. The 
account number is not the same as the user number on the 
JOB control statement, unless the site chooses to use the 
same characters for both numbers. 

PW=ptt Account password. 1 through 15 alphanumeric characters. A 
password must be specified if the installation has made it 
mandatory by installation parameter. 

NPW=wpw New account password. 1 through 15 alphanumeric 

characters. This new password replaces the old account 
password if the user number/password pair given by the AC 
and PW parameters is valid. 

US=us User number. 1 through 15 alphanumeric characters assigned 
to the user. This number identifies the user for system 
access purposes and is an optional parameter. The user 
number is not the same as the account number, unless the 
site chooses to use the same characters for both numbers. 
This parameter, if specified, overrides the user number on 
the JOB control statement. If US is not specified on the 
ACCOUNT control statement, the user number on the JOB 
statement is used by COS. 

UPW=^pw User password. 1 through 15 alphanumeric characters. A 
password must be specified if the installation has made 
security checking mandatory. 

NUPW=nupw New user password. 1 through 15 alphanumeric characters. 
This new password replaces the old user password upu if 
the user number/password pair given by the US and UPW 
parameters is valid. 



CHARGES - JOB STEP ACCOUNTING 

The CHARGES control statement allows the user to monitor a job's usage of 
computer resources up to a specific point in a job. Hence, CHARGES can 
be used for either partial or total resource reporting. 

Partial reporting occurs when parameters are specified on the control 
statement. In this case, usage statistics for the computer resources 
specified on the CHARGES statement are obtained for the job steps 
preceding the CHARGES statement. The summary is placed in the user log 
and the system log. 
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Total reporting occurs when usage statistics are obtained for all the 
resources in all the available resource groups. The summary is placed in 
the user log and the system log. 

A CHARGES statement can be placed in a job deck any number of times. If 
no CHARGES control statements are used in a job deck, computer resource 
usage statistics are gathered only upon job termination and placed in the 
user log. 



Format : 



CHARGES , SR=options . 



Parameters are in keyword form. 

SR=options 



System resources used. Any one or more of the following 
groups of resources can be specified. Options are 
separated by colons. The default is a listing of the job's 
usage of resources in all of the following groups: 

JNU Job name and user number 

DS Permanent dataset space accessed, permanent dataset 
space saved, temporary dataset space used, 512-word 
disk blocks (sectors) moved, user I/O requests, 
memory-resident datasets used, number of OPEN calls 
and number of CLOSE calls 

WT I/O wait time, time waiting to execute and time 

waiting in the input queue before beginning execution 

MM Minimum job size (words) , maximum job size (words) , 
execution-time memory usage in million word-seconds, 
I/O wait-time memory usage in million word-seconds, 
maximum field length used (words) , minimum field 
length used (words) , maximum JTA used (words) , and 
minimum JTA used (words) 

CPU Time executing in CPU 

NBF Number of 512-word blocks (sectors) received from a 
front end and number of 512-word blocks (sectors) 
queued to a front end 
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TPS Number of tape devices reserved, number of tape 
volumes mounted, amount of tape data moved 
(expressed as a multiple of 512 words) and number of 
physical tape blocks moved 

FSU Fast storage usage. Amount of SSD or BMR 

(Solid-state Storage Device or Buffer Memory) space 
reserved and used. 

The amounts are returned as two values; one is the 
wall-clock time times the reserved space usage 
amount and the other is CPU time multiplied by the 
reserved space usage amount for each device. Any of 
the four usage amounts, if nonzero, are placed in 
the user logfile. 



ROLLJOB - ROLL A USER JOB TO DISK 

The ROLLJOB control statement allows the user to protect a job by writing 
it to disk so that it can be recovered in case a system interruption 
occurs. ROLLJOB is a system verb. 

Format : 



ROLLJOB. 



Parameters : None 



SET - CHANGE SYMBOL VALUE 

The SET control statement changes the value of a specified valid job 
control language symbol. Valid symbols are those classified as alterable 
by the user (U) in table 2-1 in part 3, section 2. A job step abort 
occurs if a symbol included in a SET control statement is unknown to the 
system, can be set only by COS, or is a constant. SET is a system verb. 



Format : 



SET (symbol=expression) 
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Parameters: 

symbol A valid user-alterable symbol; symbol is a required 
parameter. 

expression 

A valid arithmetic, logical, or literal assignment 
expression. It may be delimited with parentheses to 
simplify interpretation during control statement 
evaluation, expression is a required parameter. 



Examples: 

SET(J1=J1+1) 

This example increments the procedure-local register Jl by 1. 
SET(G1=(SYSID.AND.177777B)) 

The global register Gl is given an ASCII value that is the low-order 
two characters from the current system revision level (COS X .XX) . 

SET(G3=((ABTCODE.EQ.74) .AND. (G2.EQ.0))) 

The global register G3 is assigned a value, depending upon the 
current values of ABTCODE and G2. 



ECHO - ENABLE OR SUPPRESS LOGFILE MESSAGES 

The ECHO control statement allows the user to control the message classes 
to be written to the user's logfile by turning the classes ON or OFF. 
ECHO can be used more than once during a job to toggle the 
printing/suppression of message classes. ECHO is a system verb. 



Format : 



ECHO, ON=class 1 : class 2 : . . . :c2.ass^,OFF=cZ.ass 1 :c2.ass 2 : . . . talass^. 



Parameters are in keyword form. 

OH=alass^ Only the messages in the classes specified are written 

to the user's logfile. If only the keyword ON or ON=ALL is 
specified, all messages are written to the logfile. 
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JCL and ABORT are the message classes that are currently 
abailable. JCL messages are those messages which start in 
the user's JCL input file. ABORT messages (system 
traceback and ABxxx messages, for example) are those 
messages which COS issues when it aborts a job. 

OFF=olass^ 

The messages in the classes specified are not written to 
the user's logfile. If only the keyword OFF or OFF=ALL is 
specified, all messages in defined classes (JCL and ABORT) 
are suppressed. OFF=JCL suppresses echoing of JCL control 
statements to the logfile; however, output resulting from 
the execution of the control statements will appear. 

The keywords ON and OFF can be used in any combination: both, either, or 
neither. However, a particular class should not be included in both 
OK=elassi and OFF=ola8S^, nor should both defaults (ON and OFF) 
be included. When the ECHO statement is not used, all messages are 
written to the user's logfile. 

When a job calls a procedure, the echo state of the job is the same upon 
return from the procedure as before, even though the procedure may use a 
different echo state. The following occurs when ECHO is used in 
conjunction with CALL and PROC: (1) The echo state of the caller (a job 
or another procedure) is saved so that on return to the caller the same 
state is in effect as before the call, and (2) when the procedure is 
called, a new echo state is created that affects only the procedure. If 
the procedure does not include an ECHO statement, the echo state of the 
caller is in effect. The echo state of the procedure can be changed 
during the procedure's execution. 



LIBRARY - LIST AND/OR CHANGE LIBRARY SEARCHLIST 

The LIBRARY control statement allows the user to specify the library 
datasets to be searched during the processing of control statement 
verbs. LIBRARY also allows the user to list the current or new 
searchlist to the logfile for verification. 

When modifying the searchlist, the current members of the searchlist can 
be retained in the new searchlist by including an asterisk in the LIBRARY 
control statement. The asterisk corresponds to all members of the 
current searchlist in their present order. If the asterisk is omitted, 
the new searchlist contains only the library dataset names identified on 
the LIBRARY control statement. LIBRARY is a system verb. 

The default library searchlist upon job initiation consists of the single 
library dataset $PROC. 
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Format: 



LIBRARY,DN=*in 1 :<i?i2' •• :dn§^,V. 



DN=dn^ Library dataset names to become members of the new 

library searchlist. A maximum of 64 names (separated by 
colons) can be specified. The order in which they appear 
is the order they are searched. An asterisk included in 
the list signifies the current searchlist members are to be 
part of the new searchlist in their current order. A 
maximum of 64 names are allowed in the new searchlist. 

V List the current library searchlist on the logfile for 
verification. When specified along with the new 
searchlist, the new searchlist is listed. 



OPTION - SET USER-DEFINED OPTIONS 

The OPTION control statement allows the user to specify user-defined 
options, such as the format of the job's listing. OPTION is a system 
verb. 



Format : 




Parameters : 



LPP=n Number of lines per page; a decimal number from through 
255. If is specified, the current number of lines per 
page is not changed. The default is an installation 
parameter. 
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STAT=/ 0N 
OFF 



STAT=ON has two effects. First, it enables accounting 
for any mass storage datasets created while STAT=ON is in 
effect; statistics are reported separately for each device 
containing all or part of such datasets. Second, it 
enables the printing of the dataset I/O statistics 
collected for all datasets to user $LOG at release time. 
The statistics include dataset name, device name, dataset 
size, number of user I/O requests, number of 512-word 
blocks transferred, and total time blocked for I/O for the 
dataset. No statistics are printed if STATOFF, which is 
the default condition. 



Examples: 

1. ASSIGN,DN=X. 
OPTION,STAT=ON. 

COPYF, ,0=X. 

RELEASE, DN=X. 

No I/O statistics are printed for X. 

2. OPTION, STAT=ON. 
ASSIGN, DN=X. 

COPYF, ,0=X. 

RELEASE, DN=X. 

I/O statistics are printed for X. 

3. OPTION, STAT=ON. 
ASSIGN,DN=X. 

COPYF, ,0=X. 

PT ION , STAT=OFF . 
RELEASE, DN=X. 

No I/O statistics are printed for X, even though statistics were 
collected. 

4 . O PT ION , STAT=ON . 
ASSIGN,DN=X. 

COPYF, ,0=X. 

OPTION , STAT=OFF . 

• • • 

OPTION, STAT=ON. 
RELEASE, DN=X. 

I/O statistics are printed for X. 
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DATASET DEFINITION AND CONTROL 



Datasets are defined and managed by the user through three dataset 
control statements: ASSIGN, ACCESS, and RELEASE. 

• ASSIGN defines characteristics for datasets. ASSIGN also can be 
used to create a mass storage dataset. 

• ACCESS (described in part 2, section 4) makes an existing disk or 
tape permanent dataset local to a job or can be used to create a 
dataset on magnetic tape. 

• RELEASE relinquishes access to the named dataset for the job. 



ASSIGN - ASSIGN DATASET CHARACTERISTICS 

The ASSIGN control statement creates a mass storage dataset and assigns 
dataset characteristics for tape and mass storage. If an ASSIGN is used 
for dataset creation, it must appear before the first reference to the 
dataset; otherwise, the characteristics are defined at the first 
reference. If an ASSIGN is used for a tape dataset, it must follow the 
tape ACCESS request. ASSIGN^ is a system verb. 



Format : 



ASSIGN, DN=dn , S=size ,BS=blk ,DV=ldv ,DT=dt ,DF=df , 





RDM,U ,MR,LM=Zm,DC=de ,BFI=bfi ,A=un , 



Parameters are in keyword form. The only required parameter is DN, 



t ASSIGN does not create a dataset which the CFT OPEN statement 
recognizes as existing. 
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DU=dn Local dataset name. 1 through 7 alphanumeric characters, 

the first of which is A through Z, $, %, or @; remaining 
characters may also be numeric. DN is a required parameter. 

S=size Dataset size. Octal number of sectors (512-word blocks) to 
be reserved for the dataset. The mass storage space 
reservation occurs during the first physical write to the 
dataset. If the dataset size is not given, the space for 
the dataset is dynamically allocated as needed. This 
parameter applies to mass storage datasets only and ignored 
when used for magnetic tape datasets. 

BS=blk Buffer size. Number of 512-word blocks to be reserved for 
a user buffer. The default number of blocks is set by an 
installation parameter. BS generates an error if the U 
parameter is specified (indicating unblocked dataset 
structure) . 

DV=ldv Logical device on which the dataset begins. If a logical 
device name is not given, one is chosen by the system. 
Consult the on-site analyst for possible logical device 
names. This parameter applies to mass storage datasets 
only and is ignored when used for magnetic tape datasets. 

DH=dt Device type. The allowable device types are CRT 

(interactive) and MS (mass storage). MS is the default. 
This parameter is ignored when used for magnetic tape 
datasets . 

DF=df Dataset format. This parameter is used only on output; it 

is valid only when DT=CRT. This parameter is ignored when 
used for magnetic tape datasets. Two formats are supported; 

CB Character blocked. End-of-record RCWs are converted 
(normally to line feeds) . This is the default. 

TR Transparent. End-of-record RCWs are not converted. 
The user is responsible for inserting line feeds. 

RDM Random dataset. If the RDM parameter is present, the 

dataset is read and written randomly (that is, records may 
be read or written out of sequence) . If the RDM parameter 
is not specified, only sequential or FORTRAN direct access 
I/O is allowed on the datasets. This parameter applies to 
mass storage datasets only and is invalid for magnetic tape 
datasets. 
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U Unblocked dataset structure. If the U parameter is 

present, the dataset is not in COS-defined blocked format. 
If the U parameter is absent, the dataset is a COS blocked 
dataset. (See part 1, section 2 for information on 
unblocked dataset format.) This parameter is invalid for 
interchange format tape datasets. 

MR Memory-resident dataset. If this parameter is present, the 
system I/O routines write the buffers to mass storage only 
if they become full. If the MR parameter is absent, the 
dataset is not a memory-resident dataset. MR generates an 
error if the U parameter is specified. This parameter 
applies to mass storage datasets only and is invalid for 
magnetic tape datasets. 

LM=Zm Maximum size limit for this dataset. Im specifies a 

decimal count of 512-word blocks. The job step will be 
aborted if this size is exceeded. The default and maximum 
dataset size limits are set by an installation parameter. 
This parameter applies to mass storage datasets only and is 
ignored for magnetic tape datasets. 

DC=do Disposition code. Disposition to be made of the dataset 

when it is released. This parameter applies to mass 
storage datasets only and is ignored for tape datasets. 
The default is SC. 

do is a 2-character alphabetic code describing the 
destination of the dataset as follows: 

IN The dataset is placed in the input queue of the 
destination station. 

ST Stage to mainframe. Dataset is made permanent at the 
mainframe of job origin. 

SC Scratch dataset. Dataset is deleted. 

PR Print dataset. Dataset is printed on printer at the 
mainframe of job origin. 

PU Punch dataset. Dataset is punched on any card punch 
available at the mainframe of job origin. 

PT Plot dataset. Dataset is plotted on any available 
plotter at the mainframe of job origin. 

MT Magnetic tape. Dataset is written on magnetic tape 
at the mainframe of job origin. 
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BFl=bfi Blank field initiation. Octal representation of ASCII code 
indicating the beginning of a sequence of blanks. BFI=OFF 
means that blank compression is inhibited. The default 
code is 33s (ASCII ESC code) but can be changed by an 
installation parameter. 

A=un Unit name. Unit names allow the user to refer to a dataset 
from a FORTRAN program. Each unit name is 4 characters in 
the form FTtfa:, where xx is the unit number specified. 
The unit number is an integer value in the range through 
102. However, because unit numbers 100, 101, and 102 are 
reserved for system use, a user may designate unit numbers 
through 99. 

Use of this parameter associates the designated unit with 
the dataset specified by the DN parameter. At job 
initiation, unit FT05 is associated with dataset $IN and 
unit FT06 is associated with dataset $OUT. Unit names 
should not be used as dataset names. 



NOTE 

If a dataset name is used in place of a unit 
name or vice versa, FORTRAN ' 77 auxiliary 
statements (that is, OPEN, CLOSE, and 
INQUIRE) produce unpredictable results. 



RELEASE - RELEASE DATASET 

The RELEASE control statement relinquishes access to the named datasets 
for the job. If a dataset is not permanent and its disposition code is 
SC (scratch) , the mass storage assigned to the dataset is released to the 
system. If the dataset is to be staged, the dataset is entered in the 
output queue for staging to the destination station. An end-of-data 
record is written to a permanent dataset and an ADJUST is performed when 
it is released if the dataset is blocked sequential and the previous 
operation was a write. 



Format: 



RELEASE , DN=*£n ■]_ xdn 2 : . . . xdn 8 , HOLD . 
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Parameters: 



T>M=dni Name of dataset to be released. A maximum of eight 
datasets may be specified. 

HOLD Hold generic device; do not return it to the system pool. 
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PERMANENT DATASET MANAGEMENT 



The permanent dataset management control statements provide methods for 
creating, protecting, and accessing datasets assigned permanently to mass 
storage or magnetic tape. Such datasets cannot be destroyed by normal 
system activity or engineering maintenance. 

Permanent dataset management is introduced in part 2, section 1. The 
following permanent dataset management control statements are described 
in this section: 

• SAVE 

• ACCESS 

• ADJUST 

• MODIFY 

• DELETE 

• PERMIT 



SAVE - SAVE PERMANENT DATASET 

The SAVE control statement makes a local dataset permanent and defines 
its associated characteristics for the system. For mass storage 
datasets, saving involves making an entry in the COS-resident Dataset 
Catalog (DSC) , which uniquely identifies the dataset. For magnetic tape 
datasets, saving involves front-end servicing to the defined front-end 
computer system. Under the appropriate conditions, SAVE forces any 
unwritten data (left in the output buffer) to be written, ensuring that 
all the data is made permanent. Since this situation occurs when the 
dataset has been recently written but not yet rewound or closed, SAVE 
attempts to close the dataset. The specific conditions that the dataset 
must meet are described under the SAVE macro (see the Macros and Opdefs 
Reference Manual, CRI publication SR-0012) . A permanent dataset is 
uniquely identified by permanent dataset name (PDN) , additional user 
identification (ID) , edition number (ED) , and ownership value. SAVE is a 
system verb. 

SAVE has a twofold function: 

• Creation of an initial edition of a permanent dataset 

• Creation of an additional edition of a permanent dataset 
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Format: 



SAVE , DN=cfa , PDH=pdn , lD=uid , ED=ed , RT=rt , R=rd , w=wt , w=mn , UQ , na , 




Parameters are in keyword form; the only required parameter is DN. Only 
the DN parameter is valid for tape datasets. 

DN=dn Local dataset name. The name the job will use to refer to 

the dataset while it remains local to the job. This 
dataset can be closed before the dataset is made permanent. 

PDN=pdn Permanent dataset name. The default value is dn. The 
name can be 1 through 15 characters. 

ID=uid Additional user identification. 1 through 8 alphanumeric 

characters assigned by the dataset creator. The default is 
no user ID. 

ED=eci Edition number. A value from 1 through 4095 assigned by 
the dataset creator. The default value is: 

• One, if a permanent dataset with the same PDN and ID 
does not exist, or 

• The current highest edition number plus one, if a 
permanent dataset with the same PDN and ID does exist. 

RT=rt Retention period. User-defined value from 1 through 4095 
specifying the number of days a permanent dataset is to be 
retained by the system. The default value is an 
installation-defined parameter. 

R=rd Read control word. 1 through 8 alphanumeric characters 

assigned by the dataset creator. The read control word of 
the highest numbered existing edition of a permanent 
dataset applies to all subsequent editions of that 
dataset. The default is no read control word. 
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W=wt Write control word. 1 through 8 alphanumeric characters 

assigned by the dataset creator. The write control word of 
the highest numbered existing edition of a permanent 
dataset applies to all subsequent editions of that 
dataset. To obtain write permission, the user must also 
have unique access (UQ) to that dataset. The default is no 
write control word. 

H=mn Maintenance control word. 1 through 8 alphanumeric 

characters. The maintenance control word must be specified 
if a subsequent edition of the same permanent dataset is 
saved. The default is no maintenance control word. 



UQ 



Unique access. If the UQ parameter is specified, only this 
job can access the permanent dataset at the completion of 
the SAVE function. Otherwise, multiuser access to the 
permanent dataset is granted. 



NA 



EXO=( ON 
OFF 



No abort. If this parameter is omitted, an error causes 
the job to abort. 

Execute-only dataset. This parameter sets or clears the 
execute-only status of the dataset. EXO only or EXO=ON 
causes the dataset to be saved as execute-only. EXO=OFF or 
omission of this parameter causes the dataset to be saved as 
a non-execute-only dataset. When EXO=ON has been specified 
it over ides permitted and public access modes. 



NOTE 

When processing for the SAVE request is 
complete and EXO=ON, all forms of examination 
of this dataset are prohibited. 



PRM=mode Public access mode. The following modes are allowed: 
N No public access allowed 
E Execute only 
R Read only 
W Write only 
M Maintenance only 

The installation controls the default PAM value. 

If multiple modes of access are to be allowed, more than 
one mode must be specified, such as PAM=R:W. 
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hDH=adn (m) 

Name of the attributes dataset from which attributes, 
indicated by the modifiers m, are selected. If no 
modifiers are present, then all attributes are selected. 
Attribute parameters such as NOTES=, TEXT=, PAM=, R=, etc. 
take precedence over the modifiers, adn must be the 
local dataset name of a permanent dataset. The modifiers 
must be enclosed with parentheses and separated by colons. 
The following modifiers are supported: 

Modifier Selection from attributes dataset 

PAM Public access mode attribute 

TRACK Public access tracking attribute 

CW Control words 

PERMITS Permit list 

TEXT Text attribute 

NOTES Notes attribute 

ALL All attributes 

Th=opt Track accesses, opt can be either YES or NO and 

indicates whether the owner requires that public accesses 
to the dataset be tracked. See part 2, section 1 for a 
description of public access and access tracking. The 
default TA value is NO. 

TEXT=text Text to be passed to a front-end computer system requesting 
transfer of the dataset. A maximum of 240 characters can 
be specified. This text information is considered an 
attribute of the dataset and is retained along with any 
other attributes. See part 2, section 1 for an explanation 
of all permanent dataset attributes. 

NOTES=notes 

Notes to be associated with the dataset. A maximum of 480 
characters can be specified. There is no restriction on 
the content of notes. A caret symbol in notes signifies 
end-of-line and causes AUDIT to advance to a new line when 
listing the notes. The caret symbol is included in the 480 
character maximum limit, notes is a permanent dataset 
attribute. See part 2, section 1 for an explanation of all 
permanent dataset attributes. 
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ACCESS - ACCESS PERMANENT DATASET 

The ACCESS control statement makes an existing permanent dataset local to 
a job and can be used to create a tape dataset. Following the ACCESS 
statement, all references to the permanent dataset must be by the local 
dataset name specified by the DN parameter. ACCESS assures that the user 
is authorized to use the permanent dataset. The ACCESS control statement 
must precede the ASSIGN control statement or the request call for the 
dataset. All tape datasets, whether they are new or not, must be made 
local via the ACCESS control statement or system request. ACCESS is a 
system verb. 

The user need not access a permanent dataset entered into the System 
Directory (SDR). A tape dataset cannot reside in the SDR. A basic set 
of datasets is entered into the System Directory when the operating 
system is installed. These datasets include the loader, the CFT 
compiler, the CAL assembler, UPDATE, BUILD, and system utility programs 
such as copies and dumps (all utilities described in part 2 are entered 
in the System Directory) . Other datasets can be entered into the System 
Directory according to site requirements. 

The processing of the ACCESS system request ensures the following: 

• The dataset already exists or for new magnetic tape datasets the 
dataset does not already exist. 

• The requested permissions are allowed. 

• The type of medium on which the dataset resides has been 
previously allocated by the job, provided the medium is a 
dedicated resource (such as magnetic tape) . 



Format : 



ACCESS , DN=dn , NA, PDH=pdn , ID=ui<2 , ED=ed , R=z>d , w=wt ,M.=mn , UQ , LE , Oim=ov , 




DT=dt,nm,DEtH=den r MF=fes,V0h=vol-i -.vol?-. . . .vol r ,, FSEC =fseo.l,B=lb, 

n VSEQ 



DF=df, PROT,MBS=m&s , XDT=yyddd, RT=rt , CT=ct , RF=rf , RS=rs , CS=cs . 
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Parameters are in keyword form; DN is the only required parameter for 
mass storage datasets to make an existing permanent dataset local to a 
job. 

The following parameters can be used with mass storage datasets: 

DN=c?n Local dataset name. The name the job will use to refer to 
the dataset while it remains local to the job. This is a 
required parameter. 

NA No abort indicator. This parameter when selected indicates 
that the job step is not to be aborted if an error arises 
from the access attempt. If omitted, an error condition 
causes the job step to be aborted. 

PDN=p<fn Name of a permanent dataset being accessed and already 
existing in the system. The default value is dn. The 
name can be 1 through 15 characters for mass storage 
datasets. 

ID^uid Additional user identification. 1 through 8 alphanumeric 
characters. If uid was specified at SAVE time, the ID 
parameter must be specified on the ACCESS control 
statement. The default is no user ID. This parameter 
applies to mass storage datasets only; it is ignored for 
magnetic tape datasets. 

ED=ed Edition number of permanent dataset being accessed; a value 

from 1 through 4095 was assigned by the dataset creator. 
If the ED parameter is not specified, the default is the 
highest edition number known to the system (for this 
permanent dataset) . This parameter applies to mass storage 
datasets only; it is ignored for magnetic tape datasets. 

The following parameters are used to identify the permissions for the 
accessing of a mass storage permanent dataset. 

R=rd Read control word as specified at SAVE time. 1 through 8 

alphanumeric characters assigned by the dataset creator. 
The default is no read control word. To obtain read 
permission, this parameter must be specified on the ACCESS 
control statement if a read parameter is specified when the 
dataset is saved. This parameter applies to mass storage 
datasets only; it is ignored for magnetic tape datasets. 
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W=w£ Write control word as specified at SAVE time. To obtain 
write permission, this parameter must be specified in 
conjunction with a UQ parameter on the ACCESS control 
statement if a W parameter is specified when the dataset is 
saved. Write permission is required for an ADJUST and 
applies to mass storage datasets only; it is ignored for 
magnetic tape datasets. 



M=mn 



UQ 



LE' 



Maintenance control word as specified at SAVE time. This 
parameter is specified in conjunction with a UQ parameter 
on an ACCESS control statement if the dataset is to be 
subsequently deleted. That is, maintenance permission is 
required to delete a dataset. This parameter applies to 
mass storage datasets only; it is ignored when used for 
magnetic tape datasets. 

Unique access. This parameter indicates exclusive access 
to the dataset is desired. If the UQ parameter is 
specified and the appropriate write or maintenance control 
words are specified, then write, maintenance, and/or read 
permission is granted. If UQ is not specified, then 
multiuser read access is granted by default (if at a 
minimum, the read control word is specified) . UQ is 
required to delete a permanent dataset using the DELETE 
control statement. This parameter applies to mass storage 
datasets only; it is ignored for magnetic tape datasets. 

Lowest edition number. If the LE parameter is specified, 
the lowest edition number known to the system for this 
dataset is accessed. LE cannot be specified in conjunction 
with the ED parameter. This parameter applies to mass 
storage datasets only; it is ignored when used for magnetic 
tape datasets. 



OWN=oy Ownership value. If the own parameter is specified and the 
user has been granted access by the owner, the dataset is 
made local to the job. OWN is ignored if ov matches the 
active ownership value of the job (users need not be 
permitted to their own datasets) . 

The following list describes the parameters available for the accessing 
and/or definition of magnetic tape datasets. 

DN=dn Local dataset name. The name the job will use to refer to 
the dataset while it remains local to the job. This 
parameter must be present and equated to a valid local 
dataset name not already in use. 
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DT=rfi Tape dataset generic device name. This parameter is 

required for tape datasets. Up to 16 generic names can be 
defined by the installation. Only one generic device name 
is available with the released system: 

Generic Name Significance 

*TAPE Device capable of 1600 or 6250 bpi 

NEW Creation disposition. Selection of this parameter 

indicates the dataset does not yet exist and is to be 
created by this job. If omitted, the dataset is assumed to 
already exist. NEW datasets must be written before any 
read can occur. 

Dmi=den Density of the tape dataset. This parameter applies only 
to tape datasets; it is ignored when used for mass storage 
datasets. 

6250 Dataset density of 6250 bpi, default 
1600 Dataset density of 1600 bpi 

MF=/es Front-end servicing mainframe identifier. This parameter 
allows specification of an alternate front-end computer 
system to which servicing requests are directed. If 
omitted, the front-end of job origin is used. Front-end 
servicing is a mechanism whereby auxiliary servicing (such 
as updating of front-end resident catalogs and tape 
management systems) of the dataset and/or tape volumes is 
performed . 

The following parameters identify the magnetic tape dataset to be 
accessed : 

PDN=p<in Permanent dataset name or file identifier. This parameter 
can be 1 to 44 characters and is the primary means of 
identifying the dataset. For labeled tape datasets (AL and 
SL) , the rightmost 17 characters of the PDN are used to 
match the file identifier from the label group. With 
front-end servicing the whole value given is generally used 
as the identifier. If PDN is omitted, then the DN value is 
used. 

VOh=vol Volume serial number list. An optional list of 1- through 
6-character volume serial numbers (VSNs) identify tape 
volumes where the dataset resides. The list contains up to 
255 VSNs. If the VSN list is omitted for a new tape 
dataset, then the tape volumes on which the dataset is 
written are selected by the operator and/or front-end 
servicing routine. This condition is termed a non-specific 
volume allocation. If the VSN list is omitted for an old 
tape dataset, then the volumes on which the dataset resides 
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are determined by front-end servicing. If front-end 
servicing has no knowledge of the dataset or is inactive, 
the omission of the VSN list results in a job step abort. 

FSEC=/sec File section number or volume sequence number. This 

or parameter describes on which volume, relative to the first 

VSEQ=fsec physical volume of the dataset, to begin processing. 

The volume sequence number for the first volume of the 
dataset is 1. If fsec is omitted, a value of 1 is 
assumed. This parameter has a direct relationship to the 
VSNs specified in the VOL parameter. The volume sequence 
number corresponds to the first VSN identified in the VOL 
parameter. For example, to access a tape dataset starting 
with the eighth section, specify FSEC=8 on the ACCESS call. 

LB=lb Tape dataset label type indicating the format of the tape 

labels. If this parameter is omitted, label type NL is 
assumed . 

SL IBM standard labeled tapes 
NL Unlabeled tapes; default. 
AL ANSI standard labeled tapes 

The following parameters identify the characteristics of a magnetic tape 
dataset. 

DF=df Recording format. This parameter identifies in which 

format the tape dataset is to be read and/or written. 
Legal values for this parameter are: 

TR Transparent format 
IC Interchange format 

If omitted the format is transparent. For a description of 
the formats and the associated properties see part 1, 
section 2. 

PROT Front-end protect indicator. This parameter indicates to 
the front-end computer system performing the service 
functions that the tape dataset and/or its volumes ace to 
be protected. PROT is recognized for new tape datasets 
only. If PROT is omitted, the dataset and its volumes are 
not protected. 

HBS=mbs Maximum tape block size. This parameter specifies the 
number of bytes in the largest tape block to be read or 
written, mbs describes the maximum size of a tape block 
in 8-bit bytes. 



t Deferred implementation 
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If MBS is omitted and the dataset is new, a default size 
determined by the site is used. The limiting value of the 
parameter is also left to site definition (but subject to a 
COS-imposed maximum of approximately one million bytes) . 
If omitted for an existing labeled dataset (AL or SL) , the 
maximum block size is set to the value from the label 
group. Exceeding this size when writing results in a job 
abort condition of WRITE FORMAT ERROR. When reading a tape 
block that is larger than the specified value, a job abort 
condition of LARGE BLOCK ENCOUNTERED is produced. Varying 
this parameter in an orderly fashion can greatly improve 
the performance of tape I/O. MBS is rounded up to the next 
multiple of 4096 bytes for transparent format tape datasets. 

XDT=yyddd Expiration date. Indicates the date this tape dataset 
may be overwritten, yy specifies the year and is a 
number from through 99. ddd specifies the day in the 
year and is a number from 001 through 366. This parameter 
identifies the year and the day on which a new tape dataset 
is considered dormant. If omitted and the dataset is going 
to be written, today's date is used. This parameter is 
also used as a means of communicating with a servicing 
front -end computer system. The XDT and RT parameters are 
mutually exclusive. 

RT==r»t Retention period. User-defined value from through 4095 
specifying the number of days a permanent dataset is to be 
retained by the system. The RT parameter is similar to the 
XDT parameter but allows the user to specify relative 
expiration date. If RT is omitted, the default value used 
is no days of retention. This parameter is mutually 
exclusive with the XDT parameter. 

The following tape dataset parameters specify that record and data format 
conversion are to be performed on the tape dataset at run time. 

CT=et Tape dataset conversion type, ot is a 3-character code 

describing the machine internal data representation. 

IBM IBM and compatible internal data representation 

This parameter is required if run-time data format 
conversion are to be performed; default is no conversion. 
Specifying this parameter converts data on the tape from 
32-bit IBM internal representation to 64-bit internal Cray 
system representation. Real numbers and integers are 
converted. 
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BF=rf Tape dataset record format, rf is a 1- to 8-character 

code describing the record type. This parameter describes 
one characteristic of records within the tape blocks. 
Valid values for RF using IBM compatible formatting are: 

U Undefined 

F Fixed length; all records are the same size. 

FB Fixed length and blocked; all records are identical 

length with each block containing an integral number 

of records. 
V Variable length; records size may vary. 
VB Variable length and blocked; records size may vary 

and each block varies in size according to the 

records it contains. 
VBS Variable length, blocked, and spanning. Record 

sizes can vary with the option of crossing tape 

block boundaries. Each block varies in size 

according to the records it contains. 

If this parameter is omitted, the following criteria is 
used, based on NEW and LB: 

RF=U if NEW and any label type (AL, SL, NL) 

RF=U if not NEW and nonlabeled (NL) 

RF is set to the format described by the label group, if 

not NEW and labeled (AL or SL) 

RS=rs Tape dataset record size, rs is the decimal length of 

the record expressed in units depending upon the conversion 
type; if CT=IBM, rs is the record size expressed as a 
decimal number of 8-bit bytes. This parameter defines the 
limiting size of each record in a tape block. If RS is 
omitted for an existing labeled dataset, rs is obtained 
from the label group. RS might be required if the dataset 
is new or unlabeled, depending upon the record format: 

Record format RS parameter 
F or FB Required 

V, VB, or VBS Optional 

U Irrelevant; U does not contain defined 

records. 

CS=cs Character conversion type. This parameter indicates what 
character set to be used when reading or writing character 
data. If omitted, no conversion is performed. Valid 
values are : 

AS ASCII character set 
SL EBCDIC character set 
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ADJUST - ADJUST PERMANENT DATASET 

The ADJUST control statement changes the size of a mass storage permanent 
dataset; that is, it redefines the size of the dataset. When a permanent 
dataset is overwritten, and the dataset size changes, issuing an ADJUST 
statement informs the system of the dataset' s new size. An ADJUST of a 
permanent dataset can be issued if the dataset has been previously 
accessed within the job with write permission. ADJUST is a system verb. 

Under the appropriate conditions, ADJUST forces any unwritten data to 
mass storage to ensure that all of the dataset is made permanent. Since 
this situation occurs when the dataset has been recently written to but 
not yet closed, ADJUST attempts to close the dataset. The specific 
conditions that the dataset must meet are described under the ADJUST 
macro (see the Macros and Opdefs Reference Manual, CRI publication 
SR-0012) . 

The ADJUST statement is ignored when used with magnetic tape datasets. 



Format : 



ADJUST , DN=*fa , NA . 



Parameters: 

DN=dn Local dataset name of a permanent dataset that has been 

accessed with write permission. This dataset can be closed 
before the ADJUST statement is processed. 

NA No abort. If this parameter is omitted, an error causes the 
job step to abort. 



MODIFY - MODIFY PERMANENT DATASET 

The MODIFY control statement changes permanent dataset information 
established by the SAVE function or a previously executed MODIFY 
function. A permanent dataset must be accessed with unique access (UQ) 
and all permissions before a MODIFY can be issued. MODIFY is a system 
verb. 

Once a permanent dataset exists, the read, write, and maintenance control 
words, public access mode, and access tracking may apply to subsequent 
editions of that permanent dataset. MODIFY applies to mass storage 
datasets only; it is ignored for tape datasets. 
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Format: 



MOD IF Y , DN=dn , PDK=pdn , ID=uid , ED=ed , RT=2*t , R=rd , w=w£ , M=mn , NA , 




EXO=| ON I , PMi=mode,TK=opt,TEXT=text,ViOTES=notes. 
(off) 



Parameters are in keyword form; the only required parameter is DN. 

DN=<2« Local dataset name of a permanent dataset that has been 

accessed with all permissions. DN is a required parameter. 

PDN=pdw New permanent dataset name to be applied to the existing 
dataset. If this parameter is omitted, the existing 
permanent dataset name is retained. 

ID=uid New additional user identification, to be applied to the 
existing permanent dataset. 1 through 8 alphanumeric 
characters. If this parameter is omitted, the existing 
user ID is retained. If this parameter is present without 
a value, user identification is established as binary zeros. 

ED=ed New edition number to be applied to the existing permanent 

dataset. If this parameter is omitted, the existing 
edition number is retained. 

RT=rt New retention period to be applied to the existing 

permanent dataset. If this parameter is omitted, the 
current retention period is retained. If this parameter is 
present without a value, the retention period is set to the 
installation-defined value. 

R=rd New read permission control word to be applied to the 

existing permanent dataset. If this parameter is omitted, 
the existing read permission is retained. If R is present 
without a value, read permission is established as binary 
zeros. 

W=3Jt New write permission control word to be applied to the 

existing permanent dataset. If this parameter is omitted, 
the existing write permission is retained. If W is present 
without a value, write permission is established as binary 
zeros. 
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M=mn New maintenance permission control word to be applied to 

the existing permanent dataset. If this parameter is 
omitted, the existing maintenance permission is retained. 
If M is present without a value, maintenance permission is 
established as binary zeros. 



NA 



EXO= 



ON j 

off! 



No abort. If this parameter is omitted, an error causes 
the job to abort. 

Execute-only dataset. This parameter sets or clears 
the execute-only status of a dataset. EXO only or 
EXO=ON causes the dataset to be modified to execute-only. 
EXO=OFF causes the dataset to be modified to a 
non-execute -only dataset. If this parameter is omitted, 
the execute-only status of a dataset is unchanged. 



NOTE 

When processing for the MODIFY request is 
complete and EXO=ON, all forms of examination 
of this dataset are prohibited. 



PMi=mode Public access mode. The following modes are allowed: 
N No public access allowed 
E Execute only 
R Read only 
W Write only 
M Maintenance only 

The installation controls the default PAM value. If 
multiple modes of access are to be allowed, more than one 
mode must be specified, such as PAM=R:W. 

TA=op£ Track accesses, opt can be either YES or NO and 

indicates whether the owner requires that public accesses 
to the dataset be tracked. See part 2, section 1 for a 
description of public access and access tracking. The 
default TA value is NO. 

TEXT=text Text to be passed to a front-end computer system requesting 
transfer of the dataset. A maximum of 240 characters can 
be specified. This text information is considered an 
attribute of the dataset and is retained along with any 
other attributes. See part 2, section 1 for an explanation 
of all permanent dataset attributes. 
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NOTES =notes 

Notes to be associated with the dataset. A maximum of 480 
characters can be specified. There is no restriction on the 
content of notes. A caret symbol in notes signifies 
end-of-line and causes AUDIT to advance to a new line when 
listing the notes. The caret symbol is included in the 
480 character maximum limit, notes is a permanent dataset 
attribute. See part 2, section 1 for an explanation of all 
permanent dataset attributes. 



DELETE - DELETE PERMANENT DATASET 

The DELETE control statement clears the permanence state for a dataset. 
For mass storage datasets this involves clearing the dataset' s definition 
from the Dataset Catalog (DSC). For magnetic tape datasets, a request to 
remove the dataset" s definition from the front-end's catalog is sent to 
the servicing front-end computer system. If PARTIAL is specified, the 
dataset is deleted but its attributes are retained. To issue a DELETE of 
a dataset, the job must have previously accessed the dataset with 
maintenance permission, if a maintenance control word exists for the 
dataset, and unique access (UQ) . The dataset remains a local dataset 
after deletion until job termination or execution of a RELEASE control 
statement. DELETE is a system verb. 



Format : 



DELETE , DN=d« , NA , PART I AL . 



Parameters: 

DN=drz 

NA 
PARTIAL 



Local dataset name of a permanent dataset accessed with 
maintenance permission and unique access 

No abort. If this parameter is omitted, a fatal error 
causes the job step to abort. 

Partial delete. Presence of this keyword causes the system 
to delete only the mass storage resident data. The DSC 
entry and the dataset 's attributes information are 
retained. PARTIAL can be specified only for a mass storage 
dataset. 
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PERMIT - EXPLICITLY CONTROL ACCESS TO DATASET 

The PERMIT control statement allows a user to explicitly designate who 
can access a particular permanent dataset. PERMIT applies to all 
editions of the permanent dataset. This dataset need not be local for 
PERMIT to be executed. PERMIT applies to user permanent mass storage 
datasets only. Access permission given with a PERMIT control statement 
takes precedence over the PAM parameter described under SAVE and MODIFY. 
PERMIT is a system verb. 



Format : 



PERMIT , PDN=pdn , iD=uid , MA=m , RP , uSER=oy , MW=adn , NA . 



Parameters: 
PDH= i pdn 

ID=uid 



Name of an existing user permanent dataset. The name can 
be 1 through 15 characters. PDN is a required parameter. 

Additional user identification. 1 through 8 alphanumeric 
characters. If ID was specified on the SAVE request, the 
ID parameter must be specified on the PERMIT control 
statement. The default is no user ID. 



AM=m Access mode permitted for alternate user, 
N No dataset access allowed 
E Execute only 
R Read 
W Write 
M Maintenance 



These modes are: 



Each installation controls the default AM value. If 
multiple modes of access are to be allowed, more than one 
mode must be specified, such as AM=R:W. 



RP 



Remove permit parameter. Removes the permit associated 
with the specified ownership value. 



USER=oy User ownership value associated with the user being 
permitted 

ATM=adn Local dataset name of the attributes dataset from which the 
permit list is copied 



NA 



No abort. If this parameter is omitted, an error causes 
the job step to abort. 
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EXAMPLES OF PERMANENT DATASET CONTROL STATEMENTS 

To clarify the permanent dataset management control statements, some 
examples follow: 

1. A user identified as USERXYZ creates a permanent dataset, which 
no other user can access. All subsequent editions of this 
dataset share this attribute. 

SAVE , DN=ABC , PDN=EXAMPLE1 , ED=1 , PAM=N , TA=NO . 



2. A user identified as USERXYZ, creates a permanent dataset, which 
can be accessed by all other users in read mode. 

SAVE , DN=XYZ , PDN=EXAMPLE2 , ED=1 , PAM=R, TA=NO . 

3. An alternate user is accessing the permanent dataset created in 
example 2 . 

ACCESS , DN=LOCAL , PDN=EXAMPLE2 , ED=1 , OWN=USERXYZ . 

The system does not track the alternate user access since the 
dataset was created with TA=NO. 

4. Allow another user (known in this example as USER1) to access the 
permanent dataset created in example 1 in read and execute mode 
only. 

PERMIT , PDN=EXAMPLE1 , USER=USER1 , AM=R. 

5. Enable public access tracking for the permanent dataset created 
in example 2. 

ACCESS , DN=LOCAL , PDN=EXAMPLE 2 , ED= 1 , UQ . 
MODIFY, DN=LOCAL,TA= YES) . 

6. Permit write mode access for PDN=EXAMPLE2 to users known as USER2 
and USER3. 

PERMIT , PDN=EXAMPLE2 , USER=USER2 , AM=W . 
PERMIT , PDN=EXAMPLE 2, USER=USER3 , AM=W . 

7. Change the permission granted to USER1 in example 4 to AM=W. 

PERMIT , PDN=EXAMPLE1 , USER=USER1 , AM=W . 

8. Remove the access permission granted to USER1 in example 7. 

PERMIT , PDN=EXAMPLE1 , USER=USER1 , RP . 
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9. User USERXYZ acquires a dataset, then permits another user to use 
it and subsequently partially deletes the dataset to retain just 
the PERMITS and TEXT information. 

ACQUIRE,DN=EX9,TEXT=' ' ,UQ. 

PERMIT ,PDN=EX9,USER=S0ME0NE,AM=R. 
DELETE ,DN=EX 9, PARTIAL. 

10. User USERXYZ creates a permits template. 

SAVE, DN=EX10,PDN= PERMS, A 

NOTES= ' PERMITS TEMPLATE FOR AERO USERS. A • A 

'THESE PERMITS SHOULD BE REMOVED AFTER OCT 31, 1983. ' ,UQ. 

PERMIT , PDN=PERMS , USER=USERA , AM=E . 

PERM IT , PDN=PERMS , USER=USERB , AM=R . 

PERMIT , PDN=PERMS , USER=USERC , AM=W . 

DELETE, DN=EX10 , PARTIAL . 

11. User SOMEONE acquires the dataset that was partially deleted in 
example 9. 

ACQU IRE , DN=LOCAL , PDN=EX9 , OWN=USERXYZ . 

Note that the TEXT need not be specified and that after the 
dataset has been acquired from the front-end computer system, it 
is made permanent and belongs to user USERXYZ. 
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DATASET STAGING CONTROL 



Staging is the process of transferring jobs and data in the form of COS 
datasets from a front-end computer system to Cray mass storage or of 
transferring datasets from Cray mass storage to a front-end computer 
system. Dataset staging control is introduced in part 2, section 1. 

Three control statements support staging datasets between Cray mass 
storage and a front-end system: ACQUIRE, FETCH and DISPOSE. Another 
control statement, SUBMIT, directs datasets to the COS input queue. 



ACQUIRE - ACQUIRE PERMANENT DATASET 

The ACQUIRE control statement allows the user to make a dataset permanent 
and accessible to the job making the request. ACQUIRE is a system verb. 
Some ACQUIRE control statement examples are included with the permanent 
dataset management examples (see part 2, section 5) . 

When an ACQUIRE control statement is issued, COS determines if the 
requested dataset is front-end resident or permanently resident on Cray 
mass storage by checking the COS Permanent Dataset Catalog (DSC) for a 
dataset with matching PDN, ID, ED, and ownership value fields. 

If COS determines that the requested dataset is already permanently 
resident on Cray mass storage, dataset access is granted to the job 
making the request. 

If the requested dataset is not a COS mass storage permanent dataset, the 
request for the dataset is sent to the front-end system. The front-end 
system stages the dataset to Cray mass storage. COS then makes the 
dataset permanent and grants dataset access to the job making the 
request. Until the dataset is made permanent, processing of the job 
making the request is delayed. 
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Format : 




ACQUIRE , DN=dn , PDN=pdtt , !D=uid , ED=ed , B!£=rt , R=rd , W=Wt , M=WK , UQ , TEXT=tex£ , 



MF=m f ,TlD=t id ,DF=d f ,omi=own ,~9PM=mode ,ADN=acfo (m) ,TA=0p£,NOTES=rco£es, 



Parameters are in keyword form; the only required parameter is DN. 

DH=dn Local dataset name. The name the job will use to refer to 

the dataset while it remains local to the job. 1 through 7 
alphanumeric characters, the first of which is A through Z, 
$, @, or %; remaining characters can also be numeric. DN 
is a required parameter. 

PDN=p<in Name of COS permanent dataset to be accessed or staged 

from a front-end system, saved, and accessed. This is the 
name saved by the system if the dataset is staged, pdn 
is 1 through 15 alphanumeric characters assigned by the 
dataset creator. The default for pdn is dn. 

ID^uid Additional user identification. 1 through 8 alphanumeric 

characters assigned by the dataset creator. The default is 
no user ID. 

ED=ed Edition number. A value from 1 through 4095 assigned by 

the dataset creator. The default value is: 

• One, if a permanent dataset with the same PDN and ID 
does not currently exist, or 

• The current highest edition number of that dataset if 
the permanent dataset with the specified PDN and ID 
does exist. 

RT=)"t Retention period. User-defined value from through 4095 
specifying the number of days a permanent dataset is to be 
retained by the system. The default value is an 
installation-defined parameter. 

R=rd Read control word. 1 through 8 alphanumeric characters 

assigned by the dataset creator. The default is no read 
control word. 

Vl^Jt Write control word. 1 through 8 alphanumeric characters 

assigned by the dataset creator. The default is no write 
control word. 
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M=mn Maintenance control word. 1 through 8 alphanumeric 

characters assigned by the dataset creator. The control 
word must be specified if a subsequent edition of the 
permanent dataset is saved. If no staging occurs, and the 
dataset is to be deleted, this parameter can be specified 
in conjunction with the UQ parameter (that is, maintenance 
permission is required to delete a dataset) . 



UQ 



Unique access. If the UQ parameter is specified, the job 
is granted unique access to the permanent dataset; 
otherwise, multiaccess to the permanent dataset is 
granted. If no staging is performed because the dataset 
already exists, write, maintenance, and/or read permission 
can be granted if the appropriate read, write, and/or 
maintenance control words are specified. 



TEXT=iexi Text to be passed to a front-end computer system requesting 
transfer of the dataset. A maximum of 240 characters can 
be specified. This text information is considered an 
attribute of the dataset and is retained along with any 
other attributes. See part 2, section 1 for an explanation 
of all permanent dataset attributes. 

MF=mf Identifier for the front-end computer. 2 alphanumeric 

characters. The default is the front end of job origin. 

TID=tid Terminal identifier. 1 through 8 alphanumeric characters 
identifying destination terminal. The default is the 
terminal of job origin. 

DF=df Dataset format. This parameter defines whether a dataset 

is to be presented to the Cray Computer System in COS 
blocked format and whether the front-end system is to 
perform character conversion. The default is CB. 

For example, a user wishes to acquire a dataset from 
magnetic tape in blocked binary as it appears at the 
front-end system. In this case, BB is specified. 

df is a 2-character alphanumeric code defined for use on 
the front-end system. Cray Research, Inc., suggests 
support of the following codes: 

CD Character deblocked. The front-end system performs 
character conversion to 8-bit ASCII, if necessary. 

CB Character blocked. The front-end system blocks the 
dataset before staging and performs character 
conversion to 8-bit ASCII, if necessary. 
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BD Binary deblocked. The front-end system does not 
perform character conversion. For ACQUIRE, BD is 
the same as TR. 

BB Binary blocked. The front-end system blocks the 
dataset before staging but does not do character 
conversion. 

TR Transparent. No blocking/deblocking or character 
conversion is performed. 

OWN=oy Ownership value. If the own parameter is specified and the 
user has been granted access by the owner, the dataset is 
made local to the job. OWN is ignored if ov matches the 
active ownership value of the job (users need not be 
permitted to their own datasets) . 

PPM=mode Public access mode. The following modes are allowed: 

N No public access allowed 

E Execute only 

R Read only 

W Write only 

M Maintenance only 

If more than one mode of access is to be allowed, multiple 
access modes must be specified, such as PAM=R:W. Each 
installation controls the default PAM value. 



&DN=adn (m) 



Name of attributes dataset from which attributes, indicated 
by the modifiers m, are selected. If no modifiers are 
present, then all attributes are selected. Attribute 
parameters such as NOTES=, TEXT=, PAM=, R=, etc. take 
precedence over the modifiers, adn must be the local 
dataset name of a permanent dataset. The modifiers must be 
enclosed with parentheses and separated by colons. The 
following modifiers are supported: 



Modifier Selection from attributes dataset 

PAM Public access mode attribute 

TRACK Public access tracking attribute 

CW Control words 

PERMITS Permit list 

TEXT Text attribute 

NOTES Notes attribute 

ALL All attributes 
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TA=opt Track accesses, opt can be either YES or NO and 

indicates whether the owner requires that public accesses 
to the dataset be tracked. See part 2, section 1 for a 
description of public access and access tracking. The 
default TA value is NO. 

NOTES =notes 

Notes to be associated with the dataset. A maximum of 480 
characters can be specified. There is no restriction on 
the content of notes. A caret symbol in notes signifies 
end-of-line and causes AUDIT to advance to a new line when 
listing the notes. The caret symbol is included in the 
480 character maximum limit, notes is a permanent 
dataset attribute. See part 2, section 1 for an 
explanation of all permanent dataset attributes. 



DISPOSE - DISPOSE DATASET 

The DISPOSE control statement directs a dataset to the COS output queue 
for staging to a specified front-end computer system. DISPOSE can also 
be used to alter the effects of a previous DISPOSE,DEFER of the same 
dataset. 

Defining the DISPOSE characteristics can be done before the actual 
staging via the DEFER parameter. The DEFER parameter saves all selected 
dispose parameters for use when the dataset is released, which is when 
the actual staging is initiated. DISPOSE is a system verb. 



Format: 



D ISPOSE , DN=dn , SDH=sdn , Z>C=do , HF=df ,MF=mf , SF=sf, lD=uid , TID^bid , 




ED=<?<2 , RT=rt , R=rd , W=Wt , M=mn , TEXT=text , WAIT , NOWAIT , DEFER , NRLS . 



Parameters are in keyword form; the only required parameter is DN. 

DN=dn Local dataset name. Name by which the dataset is known to 

the user job. DN is a required parameter. 

SDN=sdn Staged dataset name. 1 through 15 character name by which 
the dataset is to be known at the destination front end. 
The default for sdn is dn. 



Part 2 
SR-0011 5-5 



DC=dc Disposition code. Disposition to be made of the dataset. 

If the DC parameter is omitted, the default is PR. 

do is a 2-character alphanumeric code describing the 
destination of the dataset as follows: 

IN Input (job) dataset. Dataset is queued as a job on 
the mainframe specified with the MF parameter. 

ST Stage to front end. Dataset is made permanent at the 
front end designated by the MF parameter. 

SC Scratch dataset. Dataset is released, unless another 
DISPOSE request is still pending on the dataset. 
This parameter has the same effect as RELEASE , DH=dn . 

PR Print dataset. Dataset is printed on a printer 
available at the front end designated by the MF 
parameter. 

PU Punch dataset. Dataset is punched on any card punch 
available at the front end designated by the MF 
parameter . 

PT Plot dataset. Dataset is plotted on any available 
plotter at the front end designated by the MF 
parameter . 

MT Write dataset on magnetic tape at the front end 
designated by the MF parameter. 



NOTE 

The dataset dispositions noted above are by 
convention only. Actual dataset disposition 
is determined by the destination front end. 



DF=df Dataset format. This parameter defines whether a dataset 

is sent from the Cray Computer System in COS blocked format 
and whether the front-end system is to perform character 
conversion. The default is CB. 

For example, a user wishes to save a dataset on magnetic 
tape in blocked binary as it appears on COS mass storage. 
In this case, BB is specified. A user who wants a dataset 
printed can specify CB if the front-end computer handles 
deblocking. 
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df is a 2-character alphanumeric code defined for use on 
the front-end system. Cray Research, Inc., suggests 
support of the following codes: 

CD Character deblocked. The front-end system performs 
character conversion from 8-bit ASCII, if necessary. 

CB Character blocked. No deblocking is performed at the 
Cray mainframe before staging. The front-end system 
performs deblocking and character conversion from 
8-bit ASCII, if necessary. 

BD Binary deblocked. The front-end system does not 

perform character conversion. For DISPOSE, BD is the 
same as TR. 

BB Binary blocked. The front-end system does not 
perform character conversion. The Cray mainframe 
does not perform deblocking before staging. The 
front-end system is expected to perform deblocking. 

TR Transparent. No blocking/deblocking or character 
conversion is performed. 

Other codes can be added by the local site. Undefined 
pairs of characters can be passed but are treated as 
transparent mode by COS. 

MF=mf Front-end computer identifier. 2 alphanumeric characters. 

Identifies the front end to which the dataset is to be 
staged. If omitted, the front end where the issuing job 
originated is used. If MF is given a value of a Cray 
mainframe ID and DC=IN, an error message is issued and the 
job step is aborted (see the SUBMIT control statement later 
in this section) . 

SF=sf Special form information to be passed to the front-end 

system. 1 through 8 alphanumeric characters. SF is 
defined by the needs of the front-end system. 

ID=uid Additional user identification. 1 through 8 alphanumeric 

characters assigned by the dataset creator. The default is 
no user ID. 

1!lD=tid Terminal identifier. 1 through 8 alphanumeric characters 
identifying destination terminal. The default is terminal 
of job origin, where applicable. 
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ED=ed Edition number, meaningful only if DC=ST. A user-defined 

value from 1 through 4095. The default value depends on 
the destination front end. 

RT=2>t Retention period, meaningful only if DC=ST. A user-defined 
value from through 4095 specifying the number of days a 
dataset is to be retained by the destination front end. 
The default value depends on the destination front end. 

R=rd Read control word, meaningful only if DC=ST. 1 through 8 

alphanumeric characters. The default is no read control 
word. 

W=wt Write control word, meaningful only if DC=ST. 1 through 8 
alphanumeric characters. The default is no write control 
word. 

H=mn Maintenance control word, meaningful only if DC=ST. 1 

through 8 alphanumeric characters. The default is no 
maintenance control word. 

TEXT=text Text to be passed to the front-end system requesting 

transfer of a dataset. The format for TEXT is defined by 
the front-end system for managing its own datasets or 
files. Typically, text is in the form of one or more 
control statements for the front-end system; these 
statements must contain their own terminator for the front 
end. text cannot exceed 240 characters. 



NOTE 



text specified on the DISPOSE control 
statement is not the same as the permanent 
dataset text attribute. Any text existing 
as a permanent dataset attribute is ignored 
by DISPOSE (see part 2, section 1 for 
discussion) . 



WAIT Job wait. When this parameter is specified, the job does 
not resume processing until the disposed dataset has been 
staged to the front-end system. If the front-end system 
cancels the transfer, the waiting job is aborted and job 
step abort processing occurs as described in part 1, 
section 3. If WAIT is not specified, processing can resume 
immediately upon issue of the DISPOSE, depending upon an 
installation option. The WAIT parameter is useful in 
detecting unsuccessful transfers. 
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NOWAIT When this parameter is specified, the job does not wait 

until the dataset has been staged to the front-end system 
but resumes processing immediately. If the front -end 
system cancels the transfer, no special action is taken; 
that is, the job is not aborted. If neither WAIT or NOWAIT 
are specified, processing can resume immediately upon issue 
of the DISPOSE, depending upon an installation option. 

DEFER When this parameter is specified, the disposition occurs 

when the dataset is released either by a RELEASE request or 
job termination. The dispose characteristics are saved and 
used when the dataset is released. 

NRLS No release. When this parameter is specified, the dataset 
remains local to the job after the DISPOSE request has been 
processed. When NRLS is specified on a DISPOSE control 
statement, the dataset cannot be written to, until the 
transfer to the specified front end is completed. 
Therefore, it is advisable to use WAIT with NRLS. 



SUBMIT - SUBMIT JOB DATASET 

With SUBMIT, a job running on the Cray mainframe can direct another 
dataset (which must also be a job) to the COS input queue. The job that 
is submitted executes independently of the submitting job. SUBMIT is a 
system verb. 



Format: 



SUBMIT , DN=dn , S ID=s/ , DID=df , TID=t£<i , DEFER , NRLS . 



Parameters are in keyword format; the only required parameter is DN. 



DN=d« 



Local dataset name. A valid local dataset name, 
required parameter and must be given a value. 



DN is a 



SID=s/ 



Default source front-end system identifier; 2 alphanumeric 
characters. If an MF parameter is not specified in an 
ACQUIRE or FETCH control statement within the submitted 
job, the SID parameter defines the default source front-end 
system for the dataset to be acquired. If the MF and SID 
parameters are omitted, the default source identifier of 
the submitting job is used. 
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DID=d/ Default destination front-end identifier; 2 alphanumeric 
characters. If an MF parameter is not specified in a 
DISPOSE control statement within the submitted job, the DID 
parameter defines the default destination front-end system 
for the dataset to be disposed. If the MF and DID 
parameters are omitted, the default destination identifier 
of the submitting job is used. 

TID=ti<i Default terminal identifier. 1 through 8 alphanumeric 

character identifier defining the default terminal ID for 
the submitted job. If TID is omitted, then the terminal ID 
of the submitting job is used. 

DEFER Deferred submit. Selection of this parameter causes the 

SUBMIT characteristics to be defined, with a release of the 
dataset actually initiating the submit of the dataset. If 
DEFER is omitted, the SUBMIT occurs immediately. 

NRLS No release. This parameter indicates if the dataset is to 
remain local to the job after SUBMIT has been processed. 
If NRLS is omitted, the dataset is released after the 
SUBMIT. If selected, the dataset remains local to the job 
after the SUBMIT and is available for reading only. 



FETCH - FETCH LOCAL DATASET 

The FETCH control statement allows the user to make a dataset reside on a 
front-end computer system local to the COS job. The dataset is 
transferred from the front-end. The dataset is not made permanent on the 
Cray Computer System. The originating job is delayed until the dataset 
arrives on Cray mass storage. 



Format : 



FETCH , DN=*fa , SDN=Scfa , TEXT=texfc ,MF=wf , TID=tid , DF=df . 



Parameters are in keyword form; the only required parameter is DN. 

DN=<in Local dataset name. The name the job will use to refer to 
the dataset while it remains local to the job. 1 through 7 
alphanumeric characters, the first of which is A through Z, 
$, @, or %; remaining characters can also be numeric. DN 
is a required parameter. 
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SDH=sdn Staged dataset name. 1 through 15 alphanumeric 

characters. Name by which the dataset is known on the 
front end. The default for sdn is dn. 

DF=df Dataset format. This parameter defines whether a dataset 

is sent from the Cray Computer System in COS blocked format 
and whether the front-end system is to perform character 
conversion. The default is CB. 

For example, a user wishes to save a dataset on magnetic 
tape in blocked binary as it appears on COS mass storage. 
In this case, BB is specified. A user who wants a dataset 
printed can specify CB if the front-end computer handles 
deblocking . 

df is a 2-character alphanumeric code defined for use on 
the front-end system. Cray Research, Inc., suggests 
support of the following codes: 

CD Character deblocked. The front-end system performs 
character conversion from 8-bit ASCII, if necessary. 

CB Character blocked. No deblocking is performed at the 
Cray mainframe before staging. The front-end system 
performs deblocking and character conversion from 
8-bit ASCII, if necessary. 

BD Binary deblocked. The front-end system does not 

perform character conversion. For DISPOSE, BD is the 
same as TR. 

BB Binary blocked. The front-end system does not 
perform character conversion. The Cray mainframe 
does not perform deblocking before staging. The 
front-end system is expected to perform deblocking. 

TR Transparent. No blocking/deblocking or character 
conversion is performed. 

Other codes can be added by the local site. Undefined 
pairs of characters can be passed but are treated as 
transparent mode by COS. 

MF=mf Mainframe computer identifier. 2 alphanumeric characters. 

The default is the front end of job origin. 

lID=tid Terminal identifier. 1 through 8 characters identifying 
destination terminal. The default is terminal of job 
origin where applicable. 
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TEXT=£ext Text to be passed to the front-end system requesting 

transfer of a dataset. The format for TEXT is defined by 
the front-end system for managing its own datasets or 
files. Typically, text is in the form of one or more 
control statements for the front-end system; these 
statements must contain their own terminator for the front 
end. text cannot exceed 240 characters. 
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PERMANENT DATASET UTILITIES 



The following utility routines support permanent datasets: 

• PDSDUMP dumps all specified permanent datasets to a user-specified 
dataset. Input and output datasets can be included in the dump. 

• PDSLOAD loads permanent datasets that have been dumped by PDSDUMP 
and updates or regenerates the Dataset Catalog. Input and output 
datasets are also loaded through PDSLOAD. 

• AUDIT produces a report containing status information for each 
permanent dataset. AUDIT does not include input or output 
datasets. 

All of the permanent dataset utilities permit a shorthand notation for 
the arguments to the PDN (or PDS) , ID, US, and OWN parameters. Using 
this notatation, a dash represents any number of characters or no 
characters and an asterisk represents any one character. 

Examples: 

PDN=ABC- List all permanent dataset names beginning with ABC. 

PDN=A*** List all 4-character permanent dataset names beginning with 
A. 

PDN=-A*- List all permanent dataset names containing the letter A 
followed by one or more other characters. 

PDN=- List all permanent dataset names. 

PDN=***- List all permanent dataset names having three or more 
characters. 

When permanent dataset privacy is enabled, callers of these utilities are 
limited to actions on their own datasets unless the CW parameter is 
present on the control card. The OWN and NOWN parameters cannot be 
specified unless CW is also specified. When privacy is enabled, the US 
value from the JOB or ACCOUNT control statement is not used as a 
selection criterion. When privacy is not enabled, the US value from the 
JOB or ACCOUNT control statement is an implied dataset selection 
criterion, unless the CW parameter is present. CW must be specified if 
US is specified on the permanent dataset utility control statement. 
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PDSDUMP - DUMP PERMANENT DATASET 

PDSDUMP dumps specified permanent datasets to a dataset that can be saved 
or staged to a station as desired. Characteristics and conditions that 
cause a dataset to be omitted from dumping include: 

• Execute-only dataset 

• Dataset allocation conflict 

• Catastrophic dataset error 

• Inconsistent dataset allocation 

• Device on which the dataset resides is down 

• Inactive dataset entry in the system's Queued Dataset Table (QDT) 



Format : 



fPDNl 
PDSDUMP, QN=dn,DV=ldv, | pDS j=pdn,ED=ed t O^=su, ID=u^a , 




US=usn,a\m=ov, VAOmm/dd/yy: 'hh:mm:ss' , 



KRC=mm/dd/yy : , hh-.mm•.ss , ,TS=e>pt,X,C,D,I,0,S,SO. 



All parameters are in keyword form. Optional parameters identify which 
datasets are to be dumped or not dumped. 

DN=rfn Name of dataset to which dump is written. The default is 
$PDS. Multiple dumps to a dataset are possible; if the 
dataset specified already exists, the dump is appended to 
it. 

V>V=ldv Dumps all datasets residing on logical device Idv. 
Currently only one Idv can be specified.' 

PDN=pdn Dumps all editions of the specified permanent dataset. 

or Editions can be limited by ED parameter. 
PDS =pds 

ED=ed Edition number of permanent dataset dumped; meaningful 

only if PDS parameter is specified. 



t By default, all permanent datasets that could be specified by the 
parameters are dumped. 
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Cw=ew Installation-defined control word regulating use of 

PDSDUMP. If the CW parameter is omitted, only the datasets 
belonging to the job owner can be dumped. If the CW 
parameter is present and the correct control word is used, 
any dataset can be dumped. If an invalid control word is 
given, the job step is aborted. 

ID=uid Dumps all datasets with additional user identification as 
specified. If ID is specified without a value, all 
datasets which meet the rest of the criteria and have a 
null ID are dumped. 

US=wsn Dumps all datasets with specified user number.^ 

OWN=oy Dumps all datasets with specified ownership value. 

HAC=mm/dd/yy : ' hh : mm: s s ' 

Incremental dump. Dumps only datasets modified since the 
specified date and time. 

&B£.=mm/dd/yy. 'hhimmiss* 

Archive datasets. Dumps and deletes datasets, regardless 
of the D option, that have not been accessed since the 
specified date and time. 

TS=opt Timestamp conversion option, opt may be: 

NS Writes timestamp in nanosecond (new) format. 
RT writes timestamp in real-time clock (old) format. 
SAME Does not convert timestamp. 

CURR Writes timestamp in whatever format is the current 
system default for writing timestamps. 

If TS is not specified, TS=CURR is assumed. 

X Dumps expired datasets. 

C Dumps selected datasets never dumped or datasets modified 
since the last dump of the dataset. 

D Deletes datasets that are dumped . 

I Dumps system input datasets 

Dumps system output datasets > See note following. 

S Dumps user permanent datasets] 



t By default, all permanent datasets that could be specified by the 
parameters are dumped. 
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SO Performs selection only {suppress actual dumping or 
deleting) . 



NOTE 

If none of these parameters is specified, the 
input, output, and user permanent datasets 
are all dumped. If any of these parameters 
is specified, only those datasets of the type 
specified are dumped. 



Multiple calls to PDSDUMP can be made if the dump dataset is to include 
several permanent datasets requiring specification of different 
parameters. 



Example : 

PDSDUMP , DN=DUMPA, PDS=LIB1 . 
PDSDUMP , DN=DUMPA, PDS=LIB 2 . 

This example results in a dataset DUMPA that contains all editions of 
LIB1 and all editions of LIB2. 

PDSDUMP produces a listing (see figure 6-1) on $OUT identifying the 
datasets dumped or bypassed and summarizing the dump run. The date and 
time in the heading line refer to the time when the dump run started. 
The permanent dataset name, edition number, ID, and user number are 
extracted from the DSC entry for each dataset selected. Each message is 
followed by the notation DUMPED, DUMPED AND DELETED, or NOT DUMPED. The 
notation NOT DUMPED indicates the dataset was selected but could not be 
accessed for dumping. A user logfile message further explains the 
problem encountered. 

When dumping to a tape dataset, the recording format for the tape dataset 
must be transparent (for example, DF=TR on ACCESS statement) . If the 
dataset is recorded in interchange format, loading of the dumped datasets 
cannot be performed. 



PDSLOAD - LOAD PERMANENT DATASET 

PDSLOAD loads permanent datasets from a dataset created by PDSDUMP. If 
any of the permanent datasets already exist on Cray mass storage, it is 
reloaded only if the RP parameter is present. 
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PDSDUMP - PERMANENT DATASET DUMP UTILITY DUMP ON 



AUDPL 

AUDPL 

DSCED 

DSCED 

TXBUILD 

TXBUILD 

TXBUILD 

LONGDATASETNAME 

LONGDATASETNAME 

LONGDATASETNAME 

LONGDATASETNAME 

DSBUILD 

DSBUILD 

DSBUILD 

DSBUILD 

AUDPL 

DSCED 

TXBUILD 

AUDPL 

DSCED 



ED=0001 ID=QITTYQAT USR=SYSTEM 
ED=0002 ID=QITTYQAT USR=SYSTEM 
ED=0001 ID=QITTYQAT USR=SYSTEM 
ED=0002 ID=QITTYQAT USR=SYSTEM 
ED=0001 ID=QITTYQAT USR=SYSTEM 
ED=0002 ID=QITTYQAT USR=SYSTEM 
ED=0003 ID=QITTYQAT USR=SYSTEM 
ED=0001 ID=QITTYQAT USR=SYSTEM 
ED=0002 ID=QITTYQAT USR=SYSTEM 
ED=0003 ID=QITTYQAT USR=SYSTEM 
ED=0004 ID=QITTYQAT USR=SYSTEM 
ED=0001 ID=QITTYQAT USR=SYSTEM 
ED=0002 ID=QITTYQAT USR=SYSTEM 
ED=0003 ID=QITTYQAT USR=SYSTEM 
ED=0004 ID=QITTYQAT USR=SYSTEM 
ED=0003 ID=QITTYQAT USR=SYSTEM 
ED=0003 ID=QITTYQAT USR=SYSTEM 
ED=0004 ID=QITTYQAT USR=SYSTEM 
ED=0004 ID=QITTYQAT USR=SYSTEM 
ED=0004 ID=QITTYQAT USR=SYSTEM 



20 DATASETS SELECTED FOR DUMPING 



01/07/82 AT 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 

DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 

DUMPED 
DUMPED 
DUMPED 



14:50:44 



Figure 6-1. PDSDUMP listing 



Format : 



PDSLOAD,DN=tfrz, 



PDN 1 j 

pds rPds t E£>=ed , cw=cw , iD=uta , us=usn , 0WN=oy 





NOWN=rcoy,DV=dyft,RP,CR,A,I,0,S,NA,SO. 



All parameters are in keyword form. Optional parameters identify which 
datasets are to be loaded or not loaded. 

m\=dn Name of dataset from which permanent datasets are to be 

loaded. The default is $PDS. 
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PDN=pcin 

or 
pds =pdn 



CW=cw 

lD=uid 

XJS=usn 
ovm=ov 
NOWN=noy 

DV=dvn 



RP 



CR 



Loads all editions of the specified permanent dataset. 
Editions can be limited by the ED parameter. 



Edition number of dataset to be loaded; meaningful only if 
PDS parameter is specified. 

Installation-defined control word regulating the use of 
PDSLOAD. If CW is omitted, only datasets belonging to the 
job owner are loaded. 

Loads all datasets with additional user identification as 
specified 

Loads all datasets with specified user number^ 

Loads all datasets with specified ownership value. 

Loads selected datasets to owner nov. This parameter is 
used to change the ownership value of the selected datasets. 

Name of logical device where the output dataset is 
assigned before it is opened. If omitted, COS assigns a 
device at open time. If this parameter is specified, the 
supplied device name is requested for the output dataset 
(the one being loaded) . Note that COS can choose not to 
honor this assignment (for example, the device might not be 
currently available) . This parameter is not involved in 
any way in the selection of a dataset for loading. 

If any of the specified datasets already exists, replaces 
with the one being loaded. 

Loads the most current version of a dataset, based on 
creation time. This option allows incremental loads to be 
performed in any order. 

Loads only active datasets; that is, does not load expired 

datasets. 



I 


S 



Loads input datasets 
Loads output datasets 
Loads saved datasets 



. See note following. 



t By default, all permanent datasets that could be specified by the 
parameters are loaded. 
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NA 



Does not abort if there is not a dataset matching the 
specifications to load on the $PDS dataset. This parameter 
applies only to this situation. It does not prevent any 
other abort condition from occurring or offer reprieve 
processing of any kind. 



SO 



Performs selection only; suppresses actual loading of 
datasets. 



NOTE 



If none of these parameters is specified, the 
input, output, and saved datasets are 
loaded. If any of these parameters is 
specified, only those datasets of the type 
specified are loaded. 



PDSLOAD produces a listing on $OUT identifying the datasets loaded or 
bypassed and summarizing the load run (see figure 6-2) . The date and 
time in the heading line refer to the time when the load run started. 
The permanent dataset name, edition number, ID, and user number are 
extracted from the PDD for each dataset selected and successfully 
loaded. Each message is followed by the notation LOADED or NOT LOADED. 
The notation NOT LOADED indicates the dataset was selected but not 
loaded. An error message further explains the problem encountered. 



PDSLOAD 
ENTIT 
DSBUILD 
TXBUILD 
AUDPL 
DSCED 



- PERMANENT DATASET RESTORE UTILITY LOAD ON 01/07/82 AT 17:13:47 



ED=0001 ID=TAQI 
ED=0001 ID=TAQI 
ED=0001 ID=TAQI 
ED=0001 ID=TAQI 
ED=0001 ID=TAQI 



USR=SYSTEM 
USR=SYSTEM 
USR=SYSTEM 
USR=SYSTEM 
USR=SYSTEM 



LOADED 
LOADED 
LOADED 
LOADED 
LOADED 



5 DATASETS SELECTED FOR LOADING 



Figure 6-2. PDSLOAD listing 



AUDIT - AUDIT PERMANENT DATASETS 

The AUDIT utility provides reports on the status of each permanent dataset 
known to the system. AUDIT does not include input and output datasets. 
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If more than one parameter is selected, only those datasets which meet all 
criteria are listed. 

AUDIT supplies the following information on the listing: 



Permanent dataset name 

Dataset identifier 

Edition number 

User identifications 

Dataset size in words 

Retention time in decimal 

Number of accesses in decimal 

Public access mode 

Total block count in decimal 

Track access flag setting 



Creation date/time 

Last dump date/time 

Last access date/time 

Last modification date/time 

Device name 

note information 

text information 

Permitted users 

Access counts by user 

Number of datasets selected 



Format : 



audit, L=Wn , &=bdn , PDN=p<2« , m=uid , us=msm , DV=dvn ,sz=dsz , 




X.=mm/dd/yy •. , hh,immzss , , "SCR=mm/dd/yy : ' hh imm : s s ' , 



TLh=mm/dd/yy : 'hhimrmss ' ,TU\=nvn/dd/yy : 'hh :mm:ss * ,CW=cw, 



OWN=oy , UO=opt :opt zopt :opt:opt,BO=optzopt:optiopt. 



r 

Parameters are in keyword form. 

L=ldn List dataset name. The default is $OUT. 

B=bdn Name of dataset to receive the binary output. If B is 

specified alone, the dataset is $BINAUD. if the B parameter 
is omitted, no binary output is written. For a description 
of the binary output format, see the Binary Audit Table 
description in the COS Table Descriptions Internal Reference 
Manual, CRI publications SM-0045. 

PDH=pdn Name of permanent dataset or datasets to be listed 
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ID=uid List all permanent datasets with the specified additional 

user identification. The default is to list all IDs. If ID 
is present without an equated value, datasets having a null 
ID are selected. 

US=usn List all permanent datasets with the specified user number. 
The default is to list all user numbers. 

DV=dvn List all permanent datasets on the specified logical 

device. The default is to list permanent datasets on all 
devices. 

SZ=dsz List all permanent datasets greater than or equal to the 

specified size. Size is specified in words. The default is 
to list all sizes. 

X=mm/dd/yy: 'hhimmiss' 

List all permanent datasets expired as of the specified 
mrn/dd/yy.'hh:mm:ss' . mm/dd/yy can be specified alone. The 
default expiration date and time are "now" if only X is 
specified. 

TCR=mm/dd/yy: ' hh:mm: ss ' 

List all permanent datasets that have been created since the 
specified mm/dd/yy.*h.h.:mm:ss' . The keyword cannot be 
specified alone; however, 1CR=mm/dd/yy is sufficient. 

Tl>h=mm/dd/yy : ' hhxmmz ss' 

List all permanent datasets that have not been accessed 
since the specified mm/dd/yy :' hh'.mm: s s' . The keyword cannot 
be specified alone; however, Tl 1 h=mm/dd/yy is sufficient. 

TWi=mm/dd/yy '.' hh'.mm: ss' 

List all permanent datasets that have been modified since 
the specified mm/dd/yy. 'hh'.mm: ss' . The keyword cannot be 
specified alone; however, 1LIA=mm/dd/yy is sufficient. 

CW=cw Installation-defined control word regulating use of AUDIT. 
If the CW parameter is omitted, only the datasets belonging 
to the job owner can be listed. If the CW parameter is 
present and the correct control word is used, any dataset 
can be listed. If an invalid control word is given, the job 
step is aborted. 

OWN=oy List all permanent datasets with the specified ownership 

value. If OWN is not specified, the job's ownership value 
is used. 

Output formatting parameters: 

LO=opt zopt '.opt '.opt '.opt 

Listing option selection. The options are: 
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S Short list which includes PDN, ID, and ED listed two 
per line. This is the default for interactive jobs 
when LO is not specified. This list option cannot be 
mixed with any others. 

The following options can be specified alone or in 
combination separated by colons: 

L Long list which includes PDN, ID, ED, size in words, 
retention time, access count, track access flag, public 
access mode, creation, last access, last modification, 
last dump time, and device name. L is the default for 
batch jobs when LO is not specified. 

P Permit list which includes permitted owner name, access 
mode, access count, time of last access, and time of 
permit creation 

A Access tracking which includes accessing owner name, 
access count, time of last access, and time of first 
access 

T Text list which displays the dataset catalog text 
field 

N Notes list which displays the dataset catalog notes 
field 

BO=opt :opt xopt '.opt 

Binary audit options. These options specify what additional 
information, if any, is to be added to the standard binary 
audit file. They are ignored without comment unless a 
binary audit is requested (via the B parameter) . If more 
than one option is desired, separate them with colons. The 
options are: 

P Permits; one permit record is generated for each 
permitted user for each selected dataset. 

A Access tracking; one record is generated for each 
accessing user for each selected dataset. 

T Text; one record is generated for each selected dataset 

that has text. 

N Notes; one record is generated for each selected 
dataset that has notes. 
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Figures 6-3 through 6-7 illustrate some of the LO options as they appear 
when the listing is directed to a mass storage dataset. Interactive 
reports omit the page header line. 



AUDIT 


COS 


X.12 




PDN 


ID 




ED 


$ DEBUG 


DJB 




1 


SOVL 


DJB 




5 


ARCHIVE 


DJB 




2 


COSNL 


DJB 




1 


PROFILE 


DJB 




1 


9 


DATASETS , 


3099 


BLOCKS , 



05/24/83 12:35:33 
PDN ID 



$DS 

ARCHIVE 
AUDIT 
ISAMPL 



DJB 
DJB 
DJB 
DJB 



1585585 WORDS 



PAGE 
ED 

5 
1 

1 
1 



Figure 6-3. AUDIT, LO=S listing 



AUDIT 
ID 



COS X.12 



05/24/83 12:35:45 



= DJB 



PAGE 



PERMITTED USERS FOR PDN = ARCHIVE ID = DJB 

USER AM ACC LAST ACCESS CREATED 



XYZ 




RWM 











05/16/83 12:09:09 


ABCD 




R 











05/20/83 06:46:13 


QRZX 




RW 











05/20/83 06:46:28 


ZILCH 




E 











05/20/83 06:46:49 


PERMITTED 


USERS 


FOR PDN 


= ARCHIVE 






ID 


= DJB 


USER 




AM 


ACC LAST 


ACCESS 




CREATED 


XYZ 




RWM 











05/16/83 12:09:09 


ABCD 




R 











05/20/83 06:46:13 


QRZX 




RW 











05/20/83 06:46:28 


ZILCH 




E 











05/20/83 06:46:49 


9 DATASETS, 


3099 BLOCKS, 




1585585 WORDS 






Figure 


6-4. AUDIT, 


LO=P 


listing 
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L 



AUDIT COS X.12 05/24/83 12:36:10 PAGE 

ID - DJB 



PDN ID ED LAST LAST LAST DEVICE 

SZ RT ACC TA PAM CREATED ACCESSED MODIFIED DUMPED 

$DEBUG DJB 1 05/16/83 05/16/83 05/20/83 DD-A1-24 

5574 45 4 N RWM 11:47:36 12:22:27 06:02:22 

$DS DJB 5 03/29/83 05/18/83 05/14/83 05/20/83 DD-A2-20 

4608 45 7 N N 10:45:29 14:27:09 15:08:22 06:03:00 

NOTES : 

THE FOLLOWING NOTES LINE IS MORE THAN 72 CHARACTERS IN LENGTH. A 

123456789012345678901234567890123456789012345678901234567890123456789012 
34567890A 

THE NEXT LINE IS ONLY ONE CHARACTER LONG. A 
1 



PDN ID ED LAST LAST LAST DEVICE 

SZ RT ACC TA PAM CREATED ACCESSED MODIFIED DUMPED 



$OVL DJB 5 03/29/83 05/14/83 05/20/83 DD-A1-21 

39424 45 6 N RWM 10:45:29 17:15:38 06:05:29 

NOTES : 

SAMPLE NOTES DXT 



PDN ID ED LAST LAST LAST DEVICE 

SZ RT ACC TA PAM CREATED ACCESSED MODIFIED DUMPED 



ARCHIVE DJB 1 05/12/83 05/20/83 05/20/83 DD-A1-24 

4096 45 4 N RWM 11:18:10 06:44:22 06:04:01 

PERMITTED USERS: 



Figure 6-5. AUDIT, LO=L:P:N listing 
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AUDIT 





COS X.12 




USER 


AM 


ACC 


XYZ 


RWM 





ABCD 


R 





QRZX 


RW 





ZILCH 


E 






05/24/83 12:36:10 PAGE 

LAST ACCESS CREATED 

05/16/83 12:09:09 
05/20/83 06:46:13 
05/20/83 06:46:28 
05/20/83 06:46:49 



PDN 



SZ 



ID ED 

RT ACC TA PAM 



LAST LAST LAST 
CREATED ACCESSED MODIFIED DUMPED 



DEVICE 



ARCHIVE DJB 2 05/20/83 05/20/83 

3671 45 IN RWM 06:45:12 06:45:12 



05/20/83 DD-A2-21 
17:08:48 



PERMITTED USERS: 



USER 


AM 


ACC 


LAST ACCESS 


CREATED 


XYZ 
ABCD 
QRZX 
ZILCH 


RWM 
R 

RW 
E 










05/16/83 12:09:09 
05/20/83 06:46:13 
05/20/83 06:46:28 
05/20/83 06:46:49 



PDN 



SZ 



ID ED LAST LAST LAST 

RT ACC TA PAM CREATED ACCESSED MODIFIED DUMPED 



DEVICE 



AUDIT 

26467 

COSNL 

1498112 

ISAMPL 

3584 

PROFILE 

49 



DJB 



45 



DJB 



45 



DJB 



100 



DJB 



45 



1 05/24/83 05/24/83 

3 N RWM 10:13:33 12:35:30 

1 04/06/83 04/07/83 

3 N RWM 11:28:00 09:41:58 



DD-A1-22 



05/20/83 DD-A2-2 
06:05:04 



1 08/11/81 04/22/83 03/03/83 05/20/83 DD-A2-20 
24 N RWM 10:07:41 17:21:54 10:02:58 06:04:46 



1 04/30/83 05/24/83 
52 N RWM 14:10:28 10:13:32 



05/20/83 DD-A2-21 
06:02:54 



9 DATASETS, 



3099 BLOCKS, 



1585585 WORDS 



Figure 6-5. AUDIT, LO=L:P:N listing (continued) 
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AUDIT 
ID 



COS X.12 



05/24/83 12:35:37 



PAGE 



= DJB 



PDN 



SZ 



ID ED LAST LAST LAST 

RT ACC TA PAM CREATED ACCESSED MODIFIED DUMPED 



DEVICE 



$ DEBUG 



$DS 



$OVL 



5574 



4608 



39424 



DJB 1 05/16/83 

45 4 N RWM 11:47:36 

DJB 5 03/29/83 

45 7 N N 10:45:29 

DJB 5 03/29/83 

45 6 N RWM 10:45:29 



05/16/83 
12:22:27 

05/18/83 05/14/83 

14:27:09 15:08:22 

05/14/83 
17:15:38 



05/20/83 DD-A1-24 
06:02:22 

05/20/83 DD-A2-20 

06:03:00 

05/20/83 DD-A1-21 
06:05:29 



ARCHIVE DJB 1 05/12/83 05/20/83 

4096 45 4 N RWM 11:18:10 06:44:22 



05/20/83 DD-A1-24 
06:04:01 



ARCHIVE DJB 2 05/20/83 05/20/83 

3671 45 1 N RWM 06:45:12 06:45:12 



05/20/83 DD-A2-21 
17:08:48 



AUDIT 



26467 



DJB 1 05/24/83 05/24/83 

45 3 N RWM 10:13:33 12:35:30 



DD-A1-22 



COSNL 

1498112 


DJB 
45 


3 N 


1 
RWM 


04/06/83 
11:28:00 


ISAMPL 

3584 


DJB 
100 


24 N 


1 
RWM 


08/11/81 
10:07:41 


PROFILE 

49 


DJB 
45 


52 N 


1 
RWM 


04/30/83 
14:10:28 



04/07/83 
09:41:58 

04/22/83 03/03/83 
17:21:54 10:02:58 

05/24/83 
10:13:32 



05/20/83 DD-A2-20 
06:05:04 

05/20/83 DD-A2-20 
06:04:46 

05/20/83 DD-A2-21 
06:02:54 



9 DATASETS, 



3099 BLOCKS, 



1585585 WORDS 



Figure 6-6. AUDIT, LO=L listing 
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AUDIT COS X.12 05/24/83 12:35:53 PAGE 1 

ID = DJB 

NOTES FOR PDN = $DS ID = DJB ED = 5 

THE FOLLOWING NOTES LINE IS MORE THAN 72 CHARACTERS IN LENGTH. A 

123456789012345678901234567890123456789012345678901234567890123456789012 

34567890 a 

THE NEXT LINE IS ONLY ONE CHARACTER LONG. A 

1 

NOTES FOR PDN = $OVL ID = DJB ED = 5 

SAMPLE NOTES DXT 

9 DATASETS, 3099 BLOCKS, 1585585 WORDS 



Figure 6-7. AUDIT, LO=N listing (AUDIT, LO=T is nearly identical) 
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LOCAL DATASET UTILITIES 



Local dataset utilities provide the user with a convenient means of 
copying, positioning, or initializing local datasets. The following 
utilities are available to the user: 

• COPYR, COPYF, and COPYD copy records, files, and datasets, 
respectively. 

• SKIPR, SKIPF, and SKIPD skip records, files, and datasets, 
respectively . 

• REWIND positions a dataset at the beginning of data, that is, 
before the first block control word of the dataset. 

• WRITEDS initializes a random dataset but can also initialize a 
sequential dataset. 



NOTE 



The utilities described in this section operate only on 
datasets in COS blocked format. 



COPYR - COPY RECORDS 

The COPYR utility copies a specified number of records from one dataset 
to another starting at the current dataset position. Following the copy, 
the datasets are positioned after the EOR for the last record copied. 
The COPYR control statement is described below. 



Format: 



COPYR, I=idn , O=odn , NR=rc . 
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Parameters are in keyword form. 

I=idn Name of dataset to be copied. The default is $IN. 

0=odn Name of dataset to receive the copy. The default is $OUT. 

NR=« Decimal number of records to copy. The default is 1. If 
the dataset contains fewer than n records, the copy 
prematurely terminates on the next EOF. EOF or EOD is not 
written. If the keyword NR is specified without a value, 
the copy terminates at the next EOF. If the input dataset 
is positioned midrecord, the partial record is counted as 
one record. 



COPYF - COPY FILES 

The COPYF utility copies a specified number of files from one dataset to 
another starting at the current dataset position. Following the copy, 
the datasets are positioned after the EOF for the last file copied. The 
COPYF control statement is described below. 



Format: 



COPYF , I=idn , O=odn , NF=n . 



Parameters are in keyword form. 

I=idn Name of dataset to be copied. The default is $IN. 

O=odn Name of dataset to receive the copy. The default is $OUT. 

NF=« Decimal number of files to copy. The default is 1. If the 
dataset contains fewer than n files, the copy prematurely 
terminates on EOD. EOD is not written. If the keyword NF 
is specified without a value, the copy terminates at the 
EOD. If the input dataset is positioned midfile, the 
partial file counts as one file. 
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COPYD - COPY DATASET 

The COPYD utility copies one dataset to another starting at their current 
positions. Following the copy, both datasets are positioned after the 
EOF of the last file copied. The EOD is not written to the output 
dataset. The COPYD control statement is described below. 



Format : 



COPYD , I=idn , O=odn . 



Parameters are in keyword form. 

I=idn Name of dataset to be copied. The default is $IN. 

0=odn Name of dataset to receive the copy. The default is $OUT. 



SKIPR - SKIP RECORDS 

The SKIPR utility directs the system to bypass a specified number of 
records from the current position of the named dataset. The SKIPR 
control statement is described below. 



Format : 



SKIPR, DN=dn , NR=rc . 



Parameters are in keyword form. 

DH=dn Name of dataset to be bypassed. The default is $IN. 

HR=n Decimal number of records to skip. The default is 1. If 

the keyword NR is specified without a value, the system 
positions dn after the last EOR of the current file. If 
n is negative, SKIPR skips backward on dn. 

SKIPR does not bypass an EOF or beg inning -of -data. If an 
EOF or beg inning-of -data is encountered before n records 
have been bypassed when skipping backward, the dataset is 
positioned after the EOF or beg inning -of -data. When 
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skipping forward, the dataset is positioned after the last 
EOR of the current file. This statement is available for 
use with online tapes except that a negative value cannot 
be used for NR. 



SKIPF - SKIP FILES 

The SKIPF utility directs the system to bypass a specified number of 
files from the current position of the named dataset. The SKIPF control 
statement is described below. 



Format : 



SKIPF, DN=*fo,NF=rc. 



Parameters are in keyword form. 

DN=d« Name of dataset to be bypassed. The default is $IN. 

NF=« Decimal number of files to bypass. The default is 1. If 
the keyword NF is specified without a value, the system 
positions dn after the last EOF of the dataset. If n 
is negative, SKIPF skips backward on dn. 

If dn is positioned midfile, the partial file skipped 
counts as one file. 

SKIPF does not bypass an EOD or beginning-of-data. If 
beginning-of-data is encountered before n files have been 
bypassed when skipping backward, the dataset is positioned 
after the beginning-of-data. When skipping forward, the 
dataset is positioned before the EOD of the current file. 
This statement is available for use with online tapes 
except that a negative value cannot be used for NF; for 
interchange format tapes (DF=IC) , NF can only be 1. 

For example, if dn is positioned just after an EOF, the 
following control statement positions dn after the 
previous EOF. if dn is positioned midfile, dn will be 
positioned at the beginning of that file. 

SKIPF, DN=cfa,NF=-l. 
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SKIPD - SKIP DATASET 

The SKIPD utility directs the system to position a dataset at EOD, that 
is, after the last EOF of the dataset. It has the same effect as the 
following statement: 

SKIPF,DN=cfa,NF. 

If the specified dataset is empty or already at EOD, the statement has no 
effect. The SKIPD control statement is described below. 



Format: 



SKIPD, DN=tfa, 



The parameter is in keyword form. 

DN=dn Name of dataset to be skipped. The default is $IN. 



REWIND - REWIND DATASET 

The REWIND control statement positions the named datasets at the 
beg inning -of -data, that is, before the first block control word of the 
dataset. The $IN dataset represents an exception. After REWIND, $IN is 
positioned after the control statement file. REWIND opens any of the 
named datasets that are not open. REWIND is a system verb. 

REWIND causes an EOD to be written to the dataset if the previous 
operation was a write or if the dataset is null. If the dataset is not 
memory resident, the buffers are flushed to mass storage when REWIND 
follows a write operation. If the dataset is memory resident, the EOD is 
still placed in the buffer, but the buffer is not flushed. For an online 
magnetic tape dataset, REWIND positions the tape dataset to the beginning 
of the first volume accessed by the user. The REWIND control statement 
is described below. 



Format : 



REWIND,DN=^n 1 :<in2:. . . :<i« 8 . 
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Parameters are in keyword form. 

xm=dn^ Names of datasets to be rewound. A maximum of eight 
datasets can be specified, separated by colons. 



WRITEDS - WRITE RANDOM OR SEQUENTIAL DATASET 

The WRITEDS utility is intended for initializing a blocked dataset. It 
writes a dataset containing a single file consisting of a specified 
number of records of a specified length. This utility is especially 
useful for random datasets because a record written on a random dataset 
must end on a pre-existing record boundary. Direct-access datasets, 
implemented in CPT as defined by the ANSI X3. 9-1978 FORTRAN standard, can 
be initialized, and even extended, without the help of WRITEDS. 

WRITEDS can also be used to write a sequential dataset. 

The WRITEDS control statement is described below. 



Format: 



WRITEDS , DN^ftt , NR=nr , RL=r I . 



Parameters are in keyword form; the only required parameters are DN and 
NR. 

DH=dn Name of dataset to be written. DN is a required parameter. 

NR=nz* Decimal number of records to be written. NR is a required 
parameter set to the largest value that may be needed, 
since a dataset is generally not extended when it is in 
random mode. 

RL=2*Z Decimal record length, that is, the number of words in each 
record. The default is zero words, which generates a null 
record . 

If the record length is 1 or greater, the first word of 
each record is the record number as a binary integer 
starting with 1. 
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ANALYTICAL AIDS 8 



The following utilities provide analytical aids to the programmer: 

• DUMPJOB and DUMP are generally used together to examine the 
contents of registers and memory as they were at a specific time 
during job processing. DUMPJOB captures the information so that 
DUMP can later format selected parts of it. 

• DEBUG produces a symbolic dump. 

• DSDUMP dumps all or part of a dataset to another dataset in one of 
two formats: blocked or unblocked. 

• COMPARE compares two datasets and lists all differences. 

• FLODUMP dumps flowtrace tables when a program aborts with 
flowtrace active. 

• PRINT writes the value of an expression to the logfile. 

• SYSREF generates a global cross-reference listing for a group of 
CAL or APML programs. 

• ITEMIZE inspects and generates statistics about library datasets. 
Libraries are described in part 1, section 5; library dataset 
management is described in part 2, section 10. 



DUMPJOB - CREATE $DUMP 

The DUMPJOB control statement causes creation of the local dataset $DUMP # 
if not already existent. $DUMP receives an image of the memory assigned 
to the job (JTA and user field) when the DUMPJOB statement is 
encountered. Placing the DUMPJOB statement after a system verb, 
excluding the comment and EXIT statements, causes a dump of the Control 
Statement Processor (CSP) . A DUMPJOB statement is not honored if an 
execute-only dataset is loaded in memory; a DUMPJOB to an execute-only 
dataset is rejected. 
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If the $DUMP dataset already exists, it is overwritten each time a 
DUMPJOB control statement is processed. If $DUMP is permanent and the 
job does not have write permission, DUMPJOB aborts. If $DUMP is 
permanent and the job has write permission, the dataset is overwritten. 

If the DUMPJOB/DUMP sequence fails because of such situations as 
destroyed system-managed Dataset Parameter Areas, assign 3DUMP and save 
it with unique access. DUMPJOB writes to $DUMP, and job termination 
automatically adjusts SDUMP. $DUMP can then be inspected in a separate 
job. 

$DUMP is created as an unblocked dataset by DUMPJOB for use by DUMP. 
DUMPJOB is a system verb and cannot be continued to subsequent cards. 



Format : 



DUMPJOB. 



Parameters: None 



DUMP - DUMP REGISTERS AND MEMORY 

The DUMP utility reads and formats selected parts of the memory image 
contained in $DUMP and writes the information onto another dataset. The 
DUMP control statement can be placed anywhere in the control statement 
file after 3DUMP has been created by the DUMPJOB control statement. 

Placing the DUMPJOB and DUMP statements after an EXIT statement is 
conventional and provides the advantage of giving the dump regardless of 
which part of the job causes an error exit. The usage of DUMP and 
DUMPJOB, however, is not restricted to this purpose. 

DUMP can be called any number of times within a job. This might be done 
to dump selected portions of memory from a single $DUMP dataset or it 
might be done if $DUMP has been created more than once in a single job. 



Format : 



DUMP , I=idn , 0=odn , FW=fwa , LW=Zwa , JTA , NXP , V , DS P , FORMAT=/ , CENTER . 
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Parameters are in keyword form. 

l=idn Name of the dataset containing the memory image. The 

dataset $DUMP is created by DUMPJOB and is the default, but 
any dataset in the SDUMP (unblocked) format is acceptable. 

O=odn Name of the dataset to receive the dump; default is $OUT. 

F\R=fwa Octal first word address of memory to dump. The default 
is 0. 

LW=Zua Octal last word address+1 of memory to dump. The default 
is 200 (octal) . Specifying the keyword LW without a value 
causes the limit address to be used. 

JTA Job Table Area to be dumped. The default is no dump. 

NXP No Exchange Package, B registers, or T registers dumped. 
The default causes Exchange Package, B registers, and T 
registers to be dumped. 

V Vector registers to be dumped. The default is no dump of V 
registers. 

DSP Logical File Tables (LFTs) and Dataset Parameter Areas 

(DSPs) to be dumped. The default is to not dump LFTs and 
DSPs. 

FORMAT=/ Format for the part of memory selected by FW and LW. The 
options are: 

O Octal integer and ASCII character. This is the 
default. 

D Decimal integer and ASCII character 

X Hexadecimal integer and ASCII character 

G Floating-point or exponential, depending on the value 
of the number, and ASCII character 

P 16-bit parcel (4-word boundaries are forced for FW and 
LW) 

M Mixed hexadecimal and octal written in ASCII. Each 
16-bit parcel is represented as five characters; the 
first character is a hexadecimal digit representing 
the high-order 4 bits and the next 4 are octal 
characters representing the low-order 12 bits. 

CENTER Dump 100 (octal) words on each side of the address contained 
in the P register of the Exchange Package. The format is P. 
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Examples; 

The following example is a portion of the dump obtained using format 
0, the default format type: 



J0P193S 



USER FIELD CFOPMflTnO) 



DUMP X 07 792S4 09/1 1/79 



18 49 



0000103 0451172043047114632400 

cx"h-«0104 0000000000000000000000 

P-:-X1110 0000000000000000000000 

^.\ir<i OiKi0OO0000e00O00O00000 

0'..*->(n/o o<x 10000000000000000000 

00. X) 174 00W100000000000000PO0 

0000;. -oo ew.'ir?^ , :3?s00402i447s,v.j 

00OO7O4 0104 '016432071 16431461; 
0000710 0<;iM.-31dK314S314W14^ 

0000214 040O0000O0110O20000203 

*t * l.ND OF DUMP *** 



000000000O0220O0ia7000 

i aooeoooeoooooooooeooo 

0000000000000*100000011 
0000000000000(100000000 

OO0OOO0OO< V\100000iXiO0O 
0:10071 I wmiSii:b'i:M/'i 
04i;r^> i ;-i02o i ?.i ; K2^o i p> . 

000001 X*O00000O< rtt000OOl ' 

010.I4,-:0H "-'2i7t, >- c >wi;» , 

004000;-'0000000006401 00 



0000040011700000116600 00000700000000001 1GS62 J0B1935 

00*0000000000000000000 0000000000000000000000 

0000000000000000000000 0000000000000000000000 



030071 1 3630461 1 3633471 030470164 32071 1M 314GS 
oootnxvi* HXVXVOOO00OO00 oooxiooooixioooooixxwooo 

t'Wr ! t)ll*t»>'ll613HK POOOOOeOOOOOOOOOCWHXXii 09/11/791? 4? 

0514000<10O0O0000O00OO0 030071 13630461 13r:3347t DUMP FORMAT TYPE': 
17V '7777777777/7777777 l234'-fi7O1234!X:.70l 23456 18 49 35 
140iV.JiV,l3 T /4TE432U2.34 0377124OP00O0000OO0O00 " 7 , 

0007040. '000100OO000O00 0040002?04451O2.-'244111 • •• • (■• • 



0"'11"7?1F 4" 35 



A portion of the dump in format D: 



J0B193S 


USER FIFJ.D 


CFORMtVT-D) 


DUMP 


X 07 79254 09/11/79 


18 49 35 PA6F 1 


0000100 


5354571261 147297024 


2ll53f;7744 


1126578511715712 


ly7P324837lM4S9S 


J0B193S 


0000104 





-92.?3372036S547-"«|108 










0000110 



***** 













0000164 





r\ 


34.-M8rO47581S129709 


3546645702527091503 


09'11/791S 49 35 


0000 1^0 
















0000174 





34 7 1860475S1 8179701 


3546648702527091 509 





09/11/7918 49 35 


eeo0."po 


4923926774 1 3370GS78 


S56nR231 1 7? 37463'V.'; 


5i'80'''8O:V51480tE68? 


34743T .04758 1 8 1 29209 


DUMP FORMAT TiPES 09/11/79 


p'.'WOI 


354SS48702S27091509 





-1 


-6339931011790261074 


18 49 35 


i\- >o.:!0 


7 r>E697G2948382064<; 


l ?34SF>;'hoo i;: 34'mv's. < 


- 4595!<r;9J4537J 434340 


459662 7107 1 731367808 


7 . '? 


Op. 307 M 


461 168602809S2 e « 755 
*».* BID OF DUMP *** 


576531 ) 2104 Tai 4, : w. 


:i71i;34940'l "570624 


57654 0231885993153 


■ M » »f « HIHIHI 



A portion of the same dump specifying format X: 



JORITIP 


USFR Fit 


0000100 


4A4F423 1 39333500 


00O01O4 


0000000000000000 


00OO110 


0000000000000000 


***«« 




OOiXi 104 


000000000000H000 


OtvXil -'0 


0000001>001*XH>X>O 


tloiXll/'t 


000O0O0O00000fV *0 


000O.-:00 


44554D5O20464K5..: 


0000204 


31383034 '133ft 3335 


0000710 


6666666666666605 


0000714 


400000024040O0S3 



DUMP X.07 79E54 03, 11 '79 



OOOOOOOOnoOOPF.OO 

8000000000000000 
00000001 1O00000OO 

00000O0OO0000O0I i 
OOOC VOOl H X* * *WH1 

hirvi 31 it. 'I i \"i 
4D41b.l2'».45'.>'.0,t', 
0000000000000000 

iiKrioF 4- inrgaii 1 * 

0800.1000000.140 40 



0004O09E00009D8O 
00000000*10000000 
0O000O0000000000 

sr-HT-31 )1.-.1'3739 
iVitx^xiXVoixii'OOO 

ii roi m,h .i' en: n f., 
'. 'OOOOUOuOOOOOcXl 
FFI FTFF FFFFFFFFF 
CV3 'n V3P 1 08D 1 29C 
0OS40SO04IX100000 



00070O0000009D72 J0P1935 

00O0OO0O000O000O 

00O00000OO0O0000 



31 3S30343'>3A33"'5 
0000000000000000 

00000000000001X10 n 'll '^91!-' 4' 1 * 

30392f 3131 cF 3 '.<? DIWP F0RM.1T TYPf.s 
A72Er.OO72F_F0FV-VE is 49 35 
3FC<V3OOO000O0000 " 7 , 

0800484943494849 • 19 a »# - 



09 -tvyir 4" 35 



*** END OF P.IMP *** 
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Format G specified on the same dump portion: 



USER FIELD [FORMATS) 



0000100 


. 677213997998f794 


0000104 


0.000000000000 


0000110 


0.000000000000 




tttn 


0O001M 


000000000000 


pi'xnxo 


000000000000 


r.>.ini -4 


000000O000OO 


0000. :oo 


o 210028247902-1334 


0*1*. .704 


1816330U6368 -1139 


0000210 


R 


0000214 


343471770172E-04 




*** END OF DUMP *** 



OOOOOOOOPOOO 

O000000O0000 

000000O0000O 
CI000OOOOO000 

OOOOOOOvWOO 
ef'UTii/pi.OHi; 171P 

OOOO0000OOO0 

0O00000O0000 

000O0O0OOe&.?i 



DUMP X.07 792S4 03/11/79 IB 43 

0.000000000000 0.000000008000 J0B193S 

000000000000 0.000000000000 

OO0O0000OO00 000000000000 



2n437fi7260«S-121S 

OOOOO000O0O0 
1!>)639PP6:»;!?-11 39 

oooooooooooe 

R 
-0 301503151 190E+17 

0O0000O0OO00 



0?'11/791R 4? 3S 



181F390KP3G8-1139 

0.00OO0O0OO0OO 

0OO000009OP0 00/11/79)8 4° 3>3 

2<vl376.'?6e8G-l21S RWP FORMftT TVCES C5V1V73 

-O.1SSOO83079.I7-1912 IS 49 35 

0.2775557S6156E-16 " -> . ~ 

000000000000 ««••«•• H1HIM! 



The same portion of the dump in format P: 



USER FIELD (FORMATS) 



DUMP X 07 79254 09/11/79 



18 49 35 



PAGE 



00100100 045117 041061 034463 
0POO1O4 OO000O 000000 000000 

0000110 000000 000000 000000 

***** 

0000164 000000 0O0000 000000 

0000170 000000 0O0O00 000000 

0OO0174 OO00O0 000000 000000 

0000-00 042i,:s 046520 0?0ior, 

0OO0..-H4 O304/O O"*0G4 034472 

0000.10 063146 0G314S 06314G 

000O214 04001 <0 000002 040100 

%tt END OF DUMP *** 



032400 OOO00O 000000 110000 137000 

000000 100000 00O0O0 OOOOOO 000000 

000000 000900 0O0OO0 000000 OOO0O0 

000000 OOOOOO OOOOOO OOOOOO OOOOO0 

O00OOO 000000 OOOOOO OOOOOO OOOOOO 

000000 0A1071 07--4F1 0304P? 033471 

047 t .;:7 O'll.SOl Kyw 0- : .7| 11 OMMOS 

031.4(/; Oiioyoo oooooo otioooo oix»X> 

053146 01O44.: 010364 l'i:«;i W1042U 

000703 OO4O0O O4O00O OOO0O3 0-10100 



000004 00023(5 0PO0O0 116600 
000000 000000 OOOCOO 0OO0OO 
000000 000000 ©00000 000000 



0?w07 000000 0OO0W newe 

000000 000000 000000 000080 
000000 000000 OOOOOO OOOOOO 



030071 


0274S1 


030457 033471 


030470 


03S0P4 


03447^ 0314S5 


000000 


OOOOOO 


OOOOOO OOOOOO 


OOOOOO 


OOOOOO 


000000 000000 


030470 


035064 


0344^2 0314GS 


000000 


OOOOOO 


000000 ooivoo 


OS 1400 


OOOOOO 


0OO0P8 OOOOOO 


030071 


057461 


03045^ 03TM71 


177/7/ 


1777/7 


I y.v'y l ',.•;'•-- 


123456 


U*<24' 


O?~340 123456 


140067 


153073 


01521S 011234 


037712 


100000 


oooooo 000000 


000204 


004000 


0400O0 OOOOOO 


004000 


0-14111 


014111 04-1111 



The same portion of the dump in format M: 



J0B1935 

0000100 
0POO1O4 

ooooue 
ocoetivi 

WOOI.-0 
00* 174 

00OOW0 

OO0O2O4 

0000210 

0000714 



USER FIELD (FORMATS) 



DUMP X 07 79254 03711/79 



4511741061 

OOOOOOOOOO 
0000000000 

***** 

OOOOOOOOOO 
O&OO000000 
0000000000 
4212 I 34S520 
304/O3K064 
63146G3146 
4000000002 
*** END OT 



344S337400 
0O0OOOOOi)0 
OO0O0O00OO 

0000000000 
0000000000 
0000000000 
201064 7522 
3447Z3146S 
631466314b 
4010000203 
DUMP *** 



0O0O0OOOOO gooowooo 

8O0OO000O0 0000000000 

OOOOOOOOOO oooooooooo 



0000000000 
0000000000 
•W07127.IG1 
4650152040 
OOOOOOOOOO 
10442 10304 
0400040000 



0000000000 

oooeoooooo 

30457334/1 

S2i3isote<:> 

000*000000 
0000340100 



0000400230 O000O9G600 
O00CWCW OOOOOOOOOO 
OOOOOOOOOO OOOOOOOOOO 

3O0712'461 3045733471 
OOOOOOOOOO 0000000000 
30470 *:o64 .W2314G5 
514O00OOOO OOOOOOOOOO 
F 77771- '777 F77/7F7777 
COOG7R"!0~3 IS21SU734 
0070404000 4OOOO00OO0 



O0OO7OOOO0 oooixy«rc2 J0B1935 
OOOOOOOOOO OOOOOOOOOO 
OOOOOOOOOO 0000008000 

3O4703';O64 3447231465 

OOOOOOOOOO 0000000000 

OOOOOOOOOO OOOOOOOOOO 

3007127461 304!i733471 In IMP FORtVlT TYFE:.-. 

A3456E0247 2734003456 IS 49 35 

3771280000 OOOOOOOOOO 

0400044111 4411144111 « *• « 08 



09'11/791S 49 



09/ 11. 79 IS 49 35 



«'/ll/79 



HIH1HI 
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DEBUG - PRODUCE SYMBOLIC DUMP 

The symbolic debug utility, DEBUG, provides a means of dumping 
portions of memory and interprets the dump in terms of FORTRAN or CAL 
symbols. DEBUG is normally used after an EXIT, DUMPJOB sequence when 
a job step aborts; however it can be used anywhere provided that a 
valid version of $DUMP exists. 

To be useful, both CFT and CAL must write special tables, which the 
loader (LDR) augments with a version of the load map. The loader 
writes this information on a dataset called $DEBUG, which gives the 
FORTRAN or CAL symbol names associated with memory addresses. Table 
creation is initiated by specifying the ON=Z option for CFT or the SYM 
option for CAL. DEBUG reads $DEBUG and &DUMP and prints out variable 
names and values in a format appropriate for the variable type. 

The following example shows the conventional use of DEBUG: 

JOB , ... . 

CFT,ON=Z. 

LDR. 

EXIT. 

DUMPJOB. 

DEBUG. 



The library routine SYMDEBUG is called from either FORTRAN or CAL with 
one argument, which is a Hollerith string containing any of the DEBUG 
parameters. SYMDEBUG produces output similar to that produced by DUMP 
but interprets the memory of the running program rather than $DUMP. 

The SYMS, NOTSYMS, BLOCKS, and NOTBLOCKS parameters permit a shorthand 
notation for the arguments specified. Using this notatation, a dash 
represents any number of characters or no characters and an asterisk 
represents any one character. 

Examples : 

SYMS=ABC- Dump all symbols beginning with ABC. 

SYMS=A*** Dump all 4-character symbols beginning with A. 

SYMS=-A*- Dump all symbols containing the letter A followed by 
one or more other characters. 

SYMS=- Dump all symbols. 

SYMS=***- Dump all symbols having three or more characters. 
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Format : 



DEBUG , I=idn , O=odn , DUMP=ddn , TRACED , SYMS=SZ/m , NOTSYMS=rc!/sm , 



MAXDIM=cfim , BLOCKS=Mfc , WOTBLKS^nblk , PAGES=rcp , COMMENTS= 'string ' 



Parameters are in keyword form. 

I=idn Name of dataset containing debug symbol tables. The 

default is $DEBUG, which is created by the loader from the 
symbol tables produced by CFT and CAL. 

0=odn Name of dataset to receive the listing output from the 

symbolic debug routine. The default is $OUT. 

DlMP=ddn Name of dataset containing the dump of the user field. 

This dataset is created by the DUMPJOB control statement. 
ddn is used when the symbolic debug routine is invoked 
after an abort. The default is $DUMP. 

TRACE=rz Number of routine levels to be looked at in symbolic dump. 
DEBUG traces back through the active subprograms the number 
of levels specified by n. If this parameter is omitted or 
if TRACE is specified without a value, the default is 50. 

SYMS=S2/m List of symbols to be dumped by DEBUG. Up to 20 symbols 
can be specified; symbols are separated by a colon. This 
parameter applies to all blocks dumped. The default is all 
symbols. 

NOTSYMS=nsi/w 

List of symbols to be skipped. Up to 20 symbols can be 
specified; symbols are separated by a colon. This parameter 
applies to all blocks dumped. The default is that no 
symbols are to be skipped. This parameter takes precedence 
over the SYMS parameter. 



MAXDm=dim 



Maximum number of each dimension of the arrays to be 
dumped. This parameter allows the user to sample the 
contents of arrays without creating huge amounts of output. 
For example: 

... ,MAXDIM=3:2:3, ... 
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causes the following elements to be dumped from an array 
dimensioned as A(10,3,6): 

A(l, 1, 1) A(2, 1, 1) A(3, 1, 1) A(l, 2, 1) A(2, 2, 1) 

A(3, 2, 1) A(l, 1, 2) A(2, 1, 2) A(3, 1, 2) A(l, 2, 2) 

A(2, 2, 2) A(3, 2, 2) A(l, 1, 3) A(2, 1, 3) 

A(3, 1, 3) A(l, 2, 3) A(2, 2, 3) A(3, 2, 3) 

This parameter applies to all blocks dumped. The default 
is MAXDIM=20:5: 2:1:1:1:1. The arrays are dumped in storage 
order. 

BLOCKS=££k 

List of common blocks to be included in the symbolic dump. 
A maximum of 20 blocks can be specified. All symbols 
(qualified by the SYMS and NOTSYMS parameters) in the 
blocks named here are to be dumped. If BLOCKS is specified 
without a value, all common blocks are dumped. 

UOl!BLKS=nblk 

List of common blocks to be excluded from the symbolic 
dump. A maximum of 20 blocks can be specified. The 
default is to exclude no blocks. NOTBLKS specified without 
a value excludes all but the subprogram block. This 
parameter takes precedence over the BLOCKS parameter. 

PAGES=«p Page limit for the symbolic debug routine. The default is 
70 pages. 

COMMENT= ' string ' 

Identifier to be printed on the DEBUG output title line. 
Up to 8 ASCII characters can be specified. 



DSDUMP - DUMP DATASET 

The DSDUMP utility dumps specified portions of a dataset to another 
dataset. The dataset can be dumped in either blocked or unblocked format. 

In the blocked format, a group of words within a record, a group of 
records within a file, and a group of files within a dataset can be 
selected. Initial word number, initial record number, and initial file 
number begin with 1 and are relative to the current dataset position. 
Specifying an initial number greater than 1 causes words, records, or 
files to be skipped starting from the current position. 
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Since the initial word, record, or file number is relative to the current 
position of the dataset, the dataset must be positioned properly before 
calling DSDUMP. A rewind of the dataset before calling DSDUMP makes the 
initial word, record, and file numbers relative to the beginning of the 
dataset. When DSDUMP is completed, the input dataset is positioned after 
the last record dumped. 

The unblocked format is used for dumping a dataset without regard to 
whether it is blocked. Dumping a blocked dataset in unblocked format (by 
sectors) is possible. A group of sectors within the dataset or a group 
of words within each sector can be selected. The initial word and 
initial sector numbers begin with 1 and are always relative to the 
beginning of the dataset. Specifying an initial sector greater than 1 
causes sectors to be skipped from the beginning of the dataset; 
specifying an initial word greater than one causes words to be skipped 
from the beginning of each sector. Following a dump in unblocked format, 
the dataset is closed. 



Format : 



DSDUMP , l=idn , O=odn , DF=df , IW=n , NW=rc , IB=n , NR=n , IF=n , NF=n , IS=n , NS=* . 



Parameters are in keyword form; the only required parameter is I. 

1=idn (or XM=idn) 

Name of dataset to be dumped. This is a required parameter. 

O=odn (or h=odn) 

Name of dataset to receive the dump. The default is $OUT. 

DF=df Dump format. The default is B. 

B Blocked 
U Unblocked 

IW=« Decimal number (n) of initial word for each record/sector 
on idn. The default is 1. 

NW=n Decimal number (n) of words per record/sector to dump. 

Specifying NW without a value dumps all words to the end of 
a record/sector. The default is 1. 

IR=rc Decimal number (n) of initial record for each file on 
idn. Applicable only if DF=B. The default is 1. 

NR=n Decimal number (n) of records per file to dump. 

Specifying NR without a value dumps all records to the end 
of the file. Applicable only if DF=B. The default is 1. 
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IF=n Decimal number (n) of initial file for dataset on idn. 
Applicable only if DF=B. The default is 1. 

NF=« Decimal number (n) of files on idn to dump. Specifying 
NF without a value dumps all files to the end of the 
dataset. Applicable only if DF=B. The default is 1. 

lS=n Decimal number («) of initial sector on idn. 

Applicable only if DF=U. The default is 1. 

NS=n Decimal number (n) of sectors to dump. Specifying NS 
without a value dumps all sectors to the end of the 
dataset. Applicable only if DF=U. The default is 1. 

For blocked format, each record from idn dumped to odn is preceded by 
a header specifying the file and record number. For unblocked format, 
each sector is preceded by a header specifying the sector number. 



Format of each dump record: 



Word count 
(decimal) 



Octal interpretation 
of four words 



Character interpretation 
of four words 



A row of five asterisks indicates that one or more groups of four words 
have not been formatted because they are identical to the previous four. 
Only the first group is formatted. The number of words not formatted can 
be determined from the word counts of the formatted lines before and after 
the asterisks. The final group of four or less words is always formatted. 



COMPARE - COMPARE DATASETS 

The COMPARE utility compares two blocked datasets and lists all 
differences found. The output consists of a listing of the location of 
each discrepancy, the contents of the differing portions of the datasets, 
and a message indicating the number of discrepancies. See the CRAY-OS 
Message Manual, publication SR-0039. 

Keyword parameters allow the user to specify the maximum number of errors 
and the amount of context to be listed. 

If portions of two datasets are being compared, the portions must be 
copied to a separate dataset before comparison; COMPARE compares complete 
datasets only. 

COMPARE rewinds both input datasets before and after the comparison. 
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Format : 



COMPARE, A=adn ,B4>dn ,iA,dn ,DF^ff ,KE=trnxe ,CP=^pn , 





CS = OSYl , CW= GW 3_ : «3W 2 f ABORT=a o . 



Parameters are in keyword form; both A and B must be specified. 

K=adn and B4>dn 

Input dataset names. If adn=bdn, an error message is 
issued and the job step is aborted. A and B are required 
parameters . 

L=3,dn Dataset name for list of discrepancies. Idn must be 

different from adn and bdn. The default is $OUT. 

DF=df Input dataset format. The default is T. df is a 

1-character alphabetic code as follows: 

B Binary. The input datasets are compared logically to 
verify they are identical. If they are not identical, 
the differing words are printed in octal and as ASCII 
characters. The location printed is a word count in 
decimal. The first word of each dataset is called 
word 1 . 

T Text. The input datasets are compared to see if they 
are equivalent as text. For example, a 
blank-compressed record and its expansion are 
considered equivalent. If the two datasets are not 
equivalent, the differing records are printed as 
text. The location is printed as a record count in 
decimal. The first record of each dataset is called 
record 1. 

ME=nuxe Maximum number of differences printed. The default is 100. 

CP=cp« Amount of context printed, epn records to either side 

of a difference are printed. The CP parameter applies only 
if DF=T; if DF=B and CP are specified, an error message is 
generated. The default is 0. 

CS=csn Amount of context scanned, esn records to either side 

of a discrepancy are scanned for a match. The CS parameter 
applies only if DF=T; if DF=B and CS are specified, an 
error message is generated. The default is 0. 
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If a match is found within the defined range, subsequent 
comparisons are made at the same interval. That is, if 
record 275 of dataset A is equivalent to record 277 of 
dataset B, the next comparison is between record 276 of 
dataset A and record 278 of dataset B. 



NOTE 

If identical records occur within osn 
records of each other, the pairing is 
ambiguous and COMPARE can match the wrong 
pair. 



CW=cw or CW=cw 1 :ew 2 

Compare width. If CW=ew is specified, columns 1 through 
ow are compared. If CW=eWi:cw 2 is specified, columns 
aw-, through ew^ are compared. Specifying CW without a 
value is not permitted. The default is to compare columns 1 
through 133, but this can be changed by installation option. 
The CW parameter applies only if DF=T; if DF=B and CW are 
specified, an error message is generated. 

ABORT=ae If ae or more differences are found, the job step aborts. 
Specifying ABORT alone is equivalent to AB0RT=1 and causes 
an abort if any differences are found. Specifying ABORT 
does not prevent the listing of up to maxe differences. 



PRINT - WRITE VALUE OF EXPRESSION TO LOGFILE 

The PRINT control statement writes the value of an expression on the 
logfile. The value of the expression is written in three different 
formats: as a decimal integer, as a 22-digit octal value, and as an ASCII 
string. PRINT is a system verb. 



Format : 



PRINT (expression ) 
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Parameter: 

expression 



Any JCL expression (see part 3, section 2) . 
is required. 



This parameter 



Logfile format: 

PT060 decimal octal ASCII 

FT060 Message code indicating origin is PRINT statement 

decimal 16-digit decimal representation of evaluated expression 

octal 22-digit octal representation of evaluated expression 

ASCII 8-character ASCII representation of evaluated expression 



FLODUMP - FLOW TRACE RECOVERY DUMP 

The FLODUMP utility recovers and dumps flow trace tables when a program 
aborts with flow tracing active. The flow trace tables are dumped in the 
FORTRAN flow trace format. 

FLODUMP is invoked by specifying the F option on the CFT control 
statement and including the FLODUMP control statement in the COS control 
statement file. (Refer to the FORTRAN (CFT) Reference Manual, CRI 
publication SR-0009, for more information on the F option.) 



Format: 



FLODUMP. 



Parameters : 



None 



The following example illustrates the use of the FLODUMP control 
statement . 
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kJOB f • • • 

CFT,ON=F. 
LDR. 
EXIT. 
DUMP JOB. 
FLODUMP. 



A flow trace summary is illustrated in figure 8-1; a flow trace recovery 
dump is shown in figure 8-2. 

The examples in figures 8-1 and 8-2 show that the total time reported for 
the main program, ONF, is larger for the flow trace recovery dump 
(FLODUMP) than for the flow trace summary. The difference is that the 
time reported with FLODUMP includes the main program's execution time, 
the time required to abort the program, and the time required to recover 
the flow trace tables. 



FLOW TRACE 


SUMMARY 












ROUTINE 


TIME 


% 


CALLED 


AVERAGE T 




1 


ONF 


0.000053 


5.42 


1 


0.000053 


CALLS SUB1 


2 


SUB1 


0.000323 


32.80 


9 


0.000036 


CALLED BY ONF 
CALLS SUB2 


3 


SUB 2 


0.000322 


32.75 


9 


0.000036 


CALLED BY SUBl 
CALLS SUB3 


4 


SUB3 


0.000286 


29.04 


9 


0.000032 


CALLED BY SUB2 


*** 


TOTAL 


0.000985 










*** 


OVERHEAD 


0.000712 











SUBROUTINE LINKAGE 


OVERHEAD SUMMARY 




28 CALLS 






MINIMUM MAXIMUM 


AVERAGE 


CYCLES 


SECONDS 


% 


T REGISTERS 




1 2 




2.0 


838 


1.05E-05 


1.0640 


B REGISTERS 




2 3 




3.0 


894 


1.12E-05 


1.1351 


ARGUMENTS 









0.0 





O.OOE+00 


0.0000 


TOTAL 










1732 


2.17E-05 


2.1991 


MAXIMUM SUBROUTINE 


; DEPTH = 4 













Figure 8-1. Example of a flow trace summary 
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FLOW TRACE RECOVERY DUMP RECOVER WITH ONFDMP ACTIVE 

FLOW TRACE SUMMARY 

ROUTINE TIME % CALLED AVERAGE T 



1 ONFDMP 


0.000328 


26.04 


1 


0.000328 


CALLS SUB1 


2 SUB1 


0.000323 


25.64 


9 


0.000036 


CALLED BY ONFDMP 
CALLS SUB 2 


3 SUB 2 


0.000322 


25.61 


9 


0.000036 


CALLED BY SUB1 
CALLS SUB3 


4 SUB3 


0.000286 


22.70 


9 


0.000032 


CALLED BY SUB 2 


*** TOTAL 


0.001259 










*** OVERHEAD 


0.000712 











SUBROUTINE LINKAGE OVERHEAD SUMMARY 





MINIMUM MAXIMUM 


AVERAGE 


T REGISTERS 




1 2 


2.0 


B REGISTERS 




2 3 


3.0 


ARGUMENTS 







0.0 


TOTAL 








MAXIMUM SUBROUTINE 


DEPTH = 4 





28 CALLS 




CYCLES 


SECONDS 




838 


1.05E-05 


0.83 


894 


1.12E-05 


0.88 





0.OOE+00 


0.00 


1732 


2.17E-05 


1.71 



Figure 8-2. Example of a flow trace recovery dump 



SYSREF - GENERATE GLOBAL CROSS-REFERENCE LISTING 

The SYSREF utility generates a global cross-reference listing for a group 
of CAL or APML programs. The number of CAL or APML programs that can be 
included in such a group is limited by the amount of Cray Computer System 
memory allocated to a user. 

SYSREF reads special binary symbol tables written by CAL or APML and 
produces a single cross-reference listing for the program modules 
represented in the tables. When the X parameter appears on a CAL or APML 
statement, a record is written for each program unit assembled. The 
records are written to a dataset specified by the X parameter ($XRF by 
default or if X appears alone) . Each record has a header containing the 
name of the program unit. The rest of the record consists of 
cross-reference information for every global symbol used in that program. 
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Format: 



S YSREF , X=xdn , L=>ldn . 



Parameters: 



X=azln Name of dataset whose first file (normally the only file) 

contains one or more symbol records written by CAL and/or 
APML. The default is $XRF. 

L=ldn Name of output dataset. The default is $OUT. 



USE OF SYSREF 

SYSREF is usually used to process symbol records written by CAL and/or 
APML earlier in the same job. To do so, add X parameters to each CAL or 
APML control statement and follow them with a SYSREF control statement: 

CAL,X. 

APML,X. 

CAL,X. 

SYSREF, L=XROUT. 

3XRF is used as default in all cases. 

To process symbol records written in an earlier job, the following 
sequence is used: 

The first job: 

CAL,X. 

APML,X. 

SAVE,DN=$XRF, ID=XX. 

The second job: 

ACCESS , DN=$XRF, ID=XX. 
SYSREF, L=XROUT. 

To add more symbol records before invoking SYSREF, use: 

ACCESS , DN=$XRF , ID=XX , UQ . 
SKIPR, DN=$XRF, NR. 
CAL,X. 
SYSREF. 
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The format above has the same effect as if the CAL step had been done 
before the SAVE step. 



GLOBAL CROSS-REFERENCE LISTING FORMAT 

The global cross-reference listing contains only global symbols, 
symbol is global if it is any one of the following: 

• Named in an ENTRY or EXTERNAL statement 



• 



Defined before an IDENT statement and after any preceding END 
statement 

• Defined within a system text such as $SYSTXT 

• Defined within a section of source code bracketed by TEXT and 
ENDTEXT pseudo instructions 

The order of the symbols in the global cross-reference listing is 
lexicographic, based first on the symbol name and then (within each 
symbol name) on the module name. An exception to the order is made for 
symbol names beginning with N@, S@, or W@. These symbol names are sorted 
as if @ is the most significant (leftmost) character and the N, S, or W 
is the least significant character. The listing displays the symbol name 
correctly. The effect is a grouping of all the N@, S@, and W@ symbols 
that refer to the same field in a table. 

The global cross-reference listing consists of 13 columns: 

Column Heading Contents 

1 Value The symbol's value 

2 Symbol The symbol's name 

3 Origin The IDENT of the system text in which the symbol is 

defined; or the label of the TEXT block in which 
the symbol is defined; or *GLOBAL*, if the symbol 
is defined outside any program unit; or blank. 

4 Module The IDENT of the module within or before which the 

symbol is defined or referenced 
5-13 References A list of the lines on which the symbol is defined 

or referenced 

The symbol's name, value, and references appear in the same format as in 
a CAL or APML listing. The page number in each reference is a local page 
number which starts at 1 for each module. In a CAL or APML listing, this 
is the page number that appears in parentheses to the right of the second 
title line on each page. 
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ITEMIZE - INSPECT LIBRARY DATASETS 

The ITEMIZE utility prints a formatted report of the contents of a 
dataset generated by CAL, CFT, BUILD, LDR, UPDATE, and other compatible 
processors. 

ITEMIZE is executed using the following control statement. 



Format: 



ITEMIZE, DN=rfrt f L=odn,NREW,NF=rc,T,BL,E,B,X. 



Parameters: 
DN=dn 



Local dataset name of the dataset to be listed, 
is $OBL. 



The default 



L=odn Local dataset name where listing is written, 

omitted or is specified alone, $OUT is used. 



If L is 



NREW No rewind. Specifies the dataset is not rewound. If NREW 
is omitted, the dataset to be listed is rewound before and 
after ITEMIZE is executed. 

NF=n Number of files within a dataset to be listed. If NF is 

used alone, the contents of all files within the dataset are 
listed. If NF=n, the contents of n files within the 
dataset are listed. The default is NF=1. 

T Truncation. Specifying this parameter truncates lines on 
the listing dataset to 80 characters. Optional parameter; 
however, specifying this parameter precludes specifying the 
E, B, and X parameters. 



BL 



Burstable listing. When this parameter is specified, each 
dataset heading starts at the top of a page. The default is 
a compact listing in which a page eject occurs only when the 
current page is nearly full. 



Entry points. Specifying E causes all entry points to be 
included in the listing. Use for binary library datasets 
only. 
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Blocks. Specifying B causes all entry points, code, and 
common block information to be included in the listing. Use 
for binary library datasets only. (B overrides E.) 



X 



Externals. Specifying X causes all entry points, code, 
common block, and external information to be included in the 
listing. (X overrides B.) 



Restrictions: 

• An UPDATE PL is recognized only if it is the only item in a 
dataset . 

• ITEMIZE operates on standard COS blocked datasets only. 

A header containing the jobname, ITEMIZE version number, date, time, and 
page number appears at the top of every page. The line shown below 
appears following the header on page 1 (or only page) . The line gives 
the local dataset name of the dataset being processed. 

ITEMIZE OF dn 

ITEMIZE normally produces file-level output. However, for binary library 
datasets, it produces a more detailed record-level output. The following 
subsections describe both levels of output. 



FILE-LEVEL OUTPUT 

ITEMIZE prints one line for each file examined (up to the maximum 
specified by the NF parameter or the default of 1) . A second header line 
appears on each page and contains the column headings shown in figure 8-3. 



TITEMA 


ITEMIZE 


1.08 


05/10/82 


08: 


: 58:15 


PAGE 1 




ITEMIZE 


OF 


TESTPL 










FILE 


RECORDS 




TYPE 


LENGTH 


CHECK 


PART 


DATE 


1 


6 




PL 


18 


0650 


0650 


05/10/82 


2 


5 




PL 


15 


0512 


0512 


05/10/82 


3 


4 




PL 


12 


0313 


0313 


05/10/82 


4 


1 




PL 


6 


3075 


3075 


05/10/82 


5 


1 




PL 


6 


5756 


5756 


05/10/82 





* EOD * 






57 


2334 


2334 





Figure 8-3. Sample listing of ITEMIZE for a PL 
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Figure 8-3 is an example of ITEMIZE operating on a program library. The 
control statement used to generate the listing was ITEMIZE ,BL,NF. 

FILE Sequence number of the file within the dataset 

RECORDS Number of records within the file 

TYPE Type of information contained within the file. If the file 
is a member of a PL, the column contains PL. Other values 
which may appear in this column are ABS, REL, DAT, and 
???. ABS and REL indicate absolute and relocatable program 
modules, respectively. DAT indicates data, and ??? is used 
for otherwise unrecognized files. 

LENGTH Length of the file in words 

CHECK Checksum of the data within the file 

PART This field is the same as CHECK for file-level output. 

DATE Date of the PL from its directory or blank if other types 
of datasets 

A PL created by the UPDATE utility consists of many files. The last file 
of the dataset must be a PL directory. If NF is not specified on the 
control statement, ITEMIZE prints information only for the first files, 
although it has examined the last file. The dataset must contain only a 
PL. 



OUTPUT FOR BINARY LIBRARY DATASETS 

A binary library is a collection of binary records recognized by the 
existence of a Program Description Table (PDT) Table. For binary library 
datasets, ITEMIZE operates record-by-record rather than file-by-file. 
The second header line for binary library datasets contains the column 
headings shown in the following figure. 

Figure 8-4 is an example of ITEMIZE operating on a binary library 
dataset. The control statement used to generate the listing was 
ITEMIZE, BL,NF,X. If the control statement had been ITEMIZE, BL,NF. , 
lines with no entry in the REC column would not have appeared. 

REC Sequence number of the record within the file 

NAME Name of the program from the PDT 

TYPE ABS or REL. ABS and REL indicate absolute and relocatable 
program modules, respectively. 
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ITEMIZE 1.08 
ITEMIZE OF TESTLIB 



REC 

1 



NAME 
DUMMY1 

* ENT * 

* BLK * 

* BLK * 

* EXT * 
DUMMY 2 

* ENT * 

* BLK * 

* BLK * 

* EXT * 
DUMMY3 

* ENT * 

* BLK * 

* BLK * 

* EOF * 



TYPE 
REL 



DUMMY1 
#TB 



DUMMY2 
#TB 



DUMMY3 
#TB 



05/10/82 08:58:15 
PILE 1 
LENGTH CHECK PART 
41 6200 0344 
COMMENT: 
DUMMY1 

MODULE LENGTH : 11 
MODULE LENGTH : 4 
DUMMY2 DUMMY3 

38 2177 0244 
COMMENT: 
DUMMY 2 

MODULE LENGTH : 
MODULE LENGTH : 
DUMMY3 

34 6403 

COMMENT: 
DUMMY 3 

MODULE LENGTH : 

MODULE LENGTH : 

113 0742 



10 

4 



0637 



9 

4 

0065 



PAGE 



DATE 
05/10/82 08:58:14 



CFT 1.09 03/25/82 COS 1.11 05/09/82 



05/10/82 08:58:14 CFT 1.09 03/25/82 COS 1.11 05/09/82 



05/10/82 08:58:14 



CFT 1.09 03/25/82 COS 1.11 05/09/82 



TITEMA ITEMIZE 1.08 

ITEMIZE OF TESTLIB 
REC NAME TYPE 

1 * DIR * REL 
DIRECTORY ID : D01 

MODULE NAME : DUMMY1 . NO 

* ENT * 

* BLK* #TB 

* EXT * 

MODULE NAME : DUMMY 2 . NO 

* ENT * 

* BLK* #TB 

* EXT * 

MODULE NAME : DUMMY3 . NO 

* ENT * 

* BLK* #TB 

2 * EOF * 
* EOD * 



05/10/82 08:58:15 PAGE 2 

FILE 2 
LENGTH CHECK PART DATE 
19 3512 3512 
DIRECTORY LENGTH : 19 WORDS . 



. OF BLOCKS 
DUMMY 1 

DUMMY2 
. OF BLOCKS 
DUMMY2 

DUMMY 3 
. OF BLOCKS 
DUMMY 3 

19 
132 



1, NO. OF ENTRIES 



DUMMY 3 

1, NO. OF ENTRIES 



1, NO. OF ENTRIES 



3512 3512 
1130 0246 



1, NO. OF EXTERNALS 



1, NO. OF EXTERNALS : 1 



1, NO. OF EXTERNALS : 



Figure 8-4. Sample listing of ITEMIZE for a binary library dataset 
with X and NF parameters 



LENGTH Length of the record in words 
CHECK Checksums 
PART Checksums 



DATE 



Date of compilation from the PDT 



One line containing the data listed above is generated for each record. 
If any of the E, B, or X options are specified on the control statement, 
several additional lines can be printed. The information in these lines 
is labeled separately as described below. 
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When E, B, or X is specified, the comment field of the PDT is printed on 
a separate line. In addition, the entry point names are printed with 
five names per line. 

When B or X is specified, a separate line is printed for each block 
containing its name and length. 

When X is specified, the externals referenced by the program are printed 
with five external names per line. 

A binary library dataset contains a second directory file containing one 
record. If E, B, or X is specified on the control statement, a line is 
printed specifing the directory ID and length. In addition, entries, 
blocks, and externals are printed as described above for program records. 
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EXECUTABLE PROGRAM CREATION 



The COS Relocatable Loader is a utility program that executes within the 
user field and provides the loading and linking in memory of relocatable 
modules from datasets on mass storage. 

The relocatable loader is called through the LDR control statement when a 
user requires loading of a program in relocatable format. Absolute load 
modules can also be loaded. The design of the COS loader tables and 
relocatable loader allows program modules to be loaded, relocated, and 
linked to externals in a single pass over the dataset being loaded. This 
minimizes the time spent in loading activities on the Cray Computer 
System. The loader allows the immediate execution of the object module 
or the creation of an absolute binary image of the object module on a 
specified dataset. Loader features are governed by parameters of the LDR 
control statement. 

The relocatable loader can also generate a partially relocated module. 
This module, referred to as a relocatable overlay, is described later in 
this section. 



LDR CONTROL STATEMENT 

The loader is called into execution by the LDR control statement. 
Parameters of the control statement determine the functions to be 
performed by the loader. 



Format : 



LDR,DN=*fo, hlB=ldn ,NOLIB=Ww ,LLD, P&=adn ,MAP=op, SID= 'string • ,T=tra , 




NX,DEB=Z-,C=eom,OVL=<iir,CNS,NA,USA,L=Ww,SET=yaZ,E=^,I=S(i-tr 





NOECHO, SECURE, GRANT=SC 1 :SC 2 : • • • :SC M ,BC=2?C,PAD=pad,N0RED. 
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Parameters are in keyword form. 

DH=dn Dataset containing modules to be loaded. The default is 

$BLD. Loading continues until an end-of-file is reached. 
Modules are loaded according to block name as determined by 
a CAL IDENT card or a CFT PROGRAM, SUBROUTINE, BLOCK DATA, 
or FUNCTION statement. Duplicate blocks are skipped and an 
informative message is issued. 

Multiple files from the same dataset can be loaded by 
specifying the dataset name multiple times separated by 
colons. A maximum of eight files can be indicated. 

Datasets specified by the DN parameter are closed at the 
end of the load process. Closing a dataset has the effect 
of rewinding the dataset and releasing I/O tables and 
buffers. 

Modules to be loaded can be relocatable or absolute. 
However, the two types of modules cannot be mixed. 

For example, 

DN=L0AD1 : LOAD 2 : $BLD 

causes the loading of all modules in the first file of 
datasets LOADl, then L0AD2, and then $BLD. 

Normally the dataset is rewound before loading; however, 
consecutive occurrences of a dataset name inhibit 
subsequent rewind operations. Therefore, the statement 

DN=LOAD3:LOAD3 

causes the loading of all modules in the first two files of 
dataset L0AD3. 

The DN parameter takes on a special quality when OVL is 
specified: only one dn can be specified. The dataset 
named is the initial LOAD file used by the overlay loader. 
(See the description of overlay loading later in this 
section for more information.) 

LIB=ldn The LIB parameter names the dataset from which unsatisfied 
externals are loaded. A maximum of eight datasets can be 
named, with the dataset names separated by colons. 

Any default libraries are automatically included in the 
library list unless the NOLIB parameter is specified. The 
loader accesses the default libraries from the COS System 
Directory (SDR) if they are not local to the job; no ACCESS 
statement is required. 
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Datasets specified by the LIB parameter are closed at the 
end of the load process. Closing a dataset has the effect 
of rewinding the dataset and releasing I/O tables and 
buffers. 



NOTE 

These datasets should be generated using the 
BUILD utility to prevent unnecessary overhead in 
the loader. 



The libraries cannot be tape resident. 



NOLIB=4c2ti The NOLIB parameter value names the specific default 

library to be excluded from the load. Selecting NOLIB with 
no value specifies the exclusion of all default system 
libraries. If NOLIB is not specified, any default 
libraries that a site has are automatically included in the 
library list, along with any libraries specified on the LIB 
parameter . 

LLD Specifying the LLD parameter causes any libraries included 
in the load to be retained as local datasets at load 
completion. These local datasets remain open. If the LLD 
parameter is not specified, the loader closes all libraries 
at load completion. Datasets automatically accessed are 
not released at load completion. 

AB^idn Absolute binary object module generation. Use of this 

parameter causes an absolute binary object module to be 
written to the named dataset after the load process is 
completed. Selecting AB does not imply NX (no execution) . 
Unless NX is also selected, the loaded program begins 
execution after the binary is generated. Specifying AB 
without adn causes the module to be written on a dataset 
named $ABD, the default dataset. Some other dataset can be 
specified by AB=a<in. The dataset is not rewound before 
or after the file is written. 

If the AB parameter is omitted, no binary generation occurs. 

If OVL is specified on the loader statement, the OVLDN 
directive replaces AB; any value specified for AB is 
ignored in overlay mode. Overlay loading is fully 
described later in this section. 
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MAP=op Map control. The MAP parameter causes the loader to 
produce a map of the loaded program on the specified 
dataset. MAP can take any of the following values: 

ON Produces a block list and an entry list including 
all cross references to each entry 

FULL Same as MAP=ON 

OFF No map is produced. MAP=OFF is the default. 

PART Produces a block list only. Equivalent to MAP 
with no value specified. 

SID=' string' 

Debug routine loading. The SID parameter indicates the 
system debugging routines (SID) are to be loaded with the 
code. These routines comprise an additional binary dataset 
loaded after all DN specified datasets and before any 
libraries. 

The 'string', if provided, is passed to SID for 
evaluation as a control statement. The verb and initial 
separator are not required. For example, 

SID='I=IN,ECH=ELIST. ' is a proper string specification (the 
period is a required terminator) . For a complete 
description of SID parameters, see the Symbolic Interactive 
Debugger (SID) User's Guide, CRI publication SG-0056. If 
only SID is specified, all keyed default SID control 
statement parameter values are used. 

T=tra Transfer name. The T parameter allows specification of an 

entry name where the loader transfers control at completion 
of the load. The T parameter also specifies the entry 
included in absolute binary object modules. 

The entry name is a maximum of 8 characters. If no T 
parameter is specified, the loader begins object program 
execution at either the entry specified by the first 
encountered START pseudo from a CAL routine or at the entry 
of the first main program in CFT compiled routines. If no 
START entries are encountered, a warning message is issued 
and the first entry of the first relocatable or absolute 
module is used. 
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NOTE 

When the SID parameter is used, the load 
transfer is to the system debugger; the T 
parameter is ignored; and a warning message 
is issued to the user logfile. 



NX No execution. Inclusion of this parameter inhibits 
execution of the loaded program. 

DEB=2. Job Communication Block (JCB) length. The default 
length is 200 8 . Specifying DEB without a value 
changes the JCB length to 3000g. 

C=eom Compressed load. The C parameter allows control of the 

starting locations of modules and common blocks. An 
align bit is set for each relocatable module and common 
block that contains an ALIGN pseudo-op (see the CAL 
Assembler Version 1 Reference Manual, CRI publication 
SR-0000) . C can take on any of the following values: 

ON Forces the loading of each module and common 
block to begin at the next available location 
after the previous module or common block, 
ignoring the align bit. Equivalent to C with no 
value specified. 

PART Forces the loading of each module and common 

block with the align bit set to an instruction 
buffer boundary. If the align bit is not 
set, then that module or common block is loaded 
at the next available location after the 
previous module or common block. C=PART is the 
default. 

OFF Forces the loading of every module to an 

instruction buffer boundary.' Common blocks 
are forced to 20g-word or 403-word 
increments only if the align bit is set. 



t Instruction buffer sizes are 20 8 words for the CRAY-1 S and 40 8 
words for the CRAY X-MP. 
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QSTL=dir Overlay load. The OVL parameter indicates an overlay 
load sequence is specified on dir>. Overlay loading is 
explained in detail later in this section. If the OVL 
keyword is specified without a value, the loader 
examines the next file of SIN for an overlay load 
sequence. The default is no overlay load. Selecting 
OVL implies NX (no execution) . 

CNS Crack next control statement record image. This feature 
allows the loader to pass parameters on to the loaded 
program for analysis and use during execution of the 
loaded program. The control statement cracked follows 
the LDR control statement and is not available for 
processing by the Control Statement Processor (CSP) 
after processing by the loaded program. 



NOTE 

When the SID parameter is specified, the CNS 
parameter is ignored and a warning message is 
written to the user logfile. SID prompts for 
the control statement for the code being 
debugged . 



NA No abort. If this parameter is omitted, a caution or 
higher level loader error causes the job to abort. 

USA Unsatisfied external abort. When USA is specified, the 
loader aborts at the end if it finds one or more 
unsatisfied externals. A load map listing all unsatisfied 
externals is produced, if called for. 

L=ldn Listing output. This parameter allows the user to specify 

the name of the dataset to receive the map output. If L=0, 
all output is suppressed. The default is 30UT. 

SET=yal Memory initialization. Variables, named and blank common 
blocks, and storage areas defined by DIMENSION statements 
are set to 0, -1, or an out-of-range floating-point value 
during loading. The default is an installation option. 

SET=ZERO Memory is set to binary zeros. 

SET=0NES Memory is set to -1 (all bits set in word) . 
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SET=INDEF Memory is set to a value that causes an 

out-of-range error if the word is referenced 
as a floating-point operand. The ones 
complement of each memory address is placed in 
the low-order 24 bits of the respective word 
to aid in reading register and memory dumps. 
An example, in octal, of the value loaded into 
memory word 13216 is: 0605050037740177764561. 

E=n Lists error messages. This parameter indicates which 

level of loader-produced error messages are not to be 
listed. The user specifies one of five levels of severity, 
where n is the highest level to be suppressed. The 
default for this parameter is E=2. 

Level Type Description 

1 COMMENT Error does not hinder program 

execution. 



NOTE 



Error probably hinders program 
execution. 



CAUTION Job aborts when load process 

completes unless NA is selected; 
program might not execute properly, 

WARNING Job aborts when load process 

completes unless NX is selected; 
program execution is not possible. 



FATAL 



Job aborts immediately. 



Example : 

E=2 suppresses COMMENT and NOTE messages and allows 
CAUTION, WARNING, and FATAL messages to appear. FATAL 
messages are never suppressed. 

I=sdir Selective load. Modules from other datasets can be loaded 
according to a set of directives, sdir indicates the 
dataset containing the directives. If the I keyword is 
specified without a value, the directives are taken from 
the next file of $IN. The selective load directives are 
described later in this section. 

NOECHO Suppress writing the current control statement to the user 
logfile (that is, the control statement which invoked the 
actual loading into memory will not be written to the 
logfile) . 
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SECURE Define each dataset created during this job step to be 
secure (that is, to be released during job advancement 
unless specifically overridden with a F$DSD operating 
system request) • 

GRANT Grant the privileges defined as parameters if this module 
is loaded from the System Directory (SDR) . (These 

privileges will be merged with the users' only for the 
duration of the job step.) The following parameters are 
defined : 

SCRDSC Read DSC page 

SCSPOL SAVE/ACCESS/DELETE/LOAD/DUMP spooled dataset 

SCLUSR Load user dataset 

SCDTIM Dump time request 

SCQSDT Dequeue/queue SDT requests 

SCUPDD Access user dataset for PDSDUMP 

SCACES Access user-saved dataset without passwords 

SCQDXT LINK/MODIFY DXT requests 

SCENTR ENTER option on ACCESS 

SCNVOK Invoke job class structure 

SCDUMP Allow F$DJA requests anytime 

SCPRIV Allow special system requests 

BC=bc Blank common, be specifies the decimal number of words 

to be added to the size of blank common when the program is 
loaded for execution. The default is 0. 

PAD=pad Pad. pad specifies the decimal number of words of 

unused space to be made available in the job when the 
program is loaded for execution. After the program is 
loaded with its requested extra space the job is placed in 
user-managed field length reduction mode for the duration 
of the job step. The default is 0. 

NORED No field length reduction. Before the program is loaded 
the job is placed in user-managed field length reduction 
mode for the duration of the job step. 



LOADER EXAMPLE 

To generate a routine to allow any user to dump datasets, the following 
would be used (this would then work only if the loaded module resides in 
the COS System Directory) : 

LDR, MAP, NX,AB=PDSDUMP, GRANT=SCRDSC :SCUPDD, SECURE. 
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LOADER ERRORS 



Following is a list of the errors encountered by the loader, 
are listed by level. 



The errors 



Comment : 



Note: 



Caution: 



Warning : 



Blank common redefined 

Named common redefined smaller 

Generating BUILD directory for Library 

All files searched 

Name included before 

Name excluded before 



Overlay member not found 

Multiple load datasets ignored in overlay mode 

Illegal map value 

No start address found - first entry used 

Duplicate entry loaded and ignored 

Duplicate program block name encountered and skipped 

Bad directory format on library dataset 

Unsatisfied external 

Disabled parameter selected and ignored 

Dataset replaced by file DN 

Invalid read, try again 

No selective modules from dataset 

Skip dataset included before 

Invalid selective file 



Blank common address not large enough 

Dataset name too long 

Named common defined larger 

Relocatable load module in absolute mode 

Member error 

Directive error 

Illegal character in overlay directive 

Compile error 

Transfer is to SID; T parameter ignored. 

SID loaded; CNS parameter ignored. 

Absolute load module in relocatable load 



Start entry not found 

Bad XI field in External Relocation Table (XRT) Table 
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Fatal: 



More than one internal relocation block 

Invalid table type 

Unable to open specified dataset 

Null file or abnormal table found 

Invalid program block name 

Initial table not Program Description Table (PDT) 



LOAD MAP 

Each time the loader is called, the user has the option of requesting a 
listing that describes where each module is loaded and what entry points 
and external symbols are used for loading. This listing is called a load 
map. 

The user specifies the contents of the map or the dataset to receive the 
map by setting parameters of the LDR control statement to the desired 
values. The MAP parameter of the LDR control statement allows the user 
to specify the contents of the map requested. MAP=ON or MAP=FULL 
produces a block list and an entry list. The block list gives the names, 
beginning addresses and lengths of the program and subroutines loaded on 
this loader call; the entry list includes all cross references to each 
entry. MAP=PART supplies a partial map, that is, the block map only. 

The load map is printed when requested even if fatal errors abort the 
load. In this case, the map contains only those modules loaded up to the 
point where the fatal load error occurred. 

Figure 9-1 illustrates the load map generated by the following LDR 
s tatement : 

LDR, DN=$BLD : L0AD2 , LIB=MYLIB ,MAP=FULL . 

The block list consists of items 1 through 16 in figure 9-1; the entry 
list includes items 17 through 21. 



© 
© 
© 
© 



Job name from the JOB control statement 

Loader level and Julian date of assembly of the loader 

Date and time of loader execution 

Page number 

($ J Load type; either relocatable, absolute, or overlay 
(6 j Entry name to which initial transfer is given 
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© 



T3675D2 



© 



© 



LDR X.12 83126 



RELOCATABLE LOAD 



05/18/83 08:39:37 PAGE 1 



© 



LOAD TRANSFER IS TO 



© 



AT ( 



© 



DATASET 


BLOCK 

CD 

* SYSTEM^^ 


ADDRESS 


LENGTH 


DATE 


OS REV 


PROCSSR 


VER. 


COMMENT 


© 


® 


®200 


® 


S 


® 


® 


S 


$BLD 


TYPECHK 


200 


1227 


05/18/83 


COS X.12 


CFT X.ll 


05/10/83 




LOAD 2 


ABCDEFGH 


1427 


23 


05/18/83 


COS X.12 


CFT X.ll 


05/10/83 




MYLIB 


XI 


1500 


30 


05/18/83 


COS X.12 


CFT X.ll 


05/10/83 





X2 



1540 



30 05/18/83 COS X.12 CFT X.ll 05/10/83 



® 



$WFD 

Swot 


13727 
15756 


2027 05/06/83 
1035 05/06/83 


COS X.12 
COS X.12 


CAL X.12 05/06/83 
CAL X.12 05/06/8 3 


® 

BLOCK NAME 


® 

ENTRIES 


® 

ENTRY VALUE 


® 

ABSOLUTE REFERENCES 


TYPECHK 

ABCDEFGH 

XI 


TYPECHK 
: ABCDEFGH 
XI 


736a 
1432a 
1510a 


1410d 
1435d 




$WUT 


WUTI 

WUTD% 

WUTF 


16056a 
16174a 
16254a 


15205c 
15213c 
15221b 


15206b 

15217a 15220c 



*** LOAD IMAGE STATISTICS *** 
ABSOLUTE BINARY LENGTH: 7691(10), 

PROGRAM IMAGE: FWA = 200(8), 



17013(8) WORDS 
LWA = 17213(8) 



Figure 9-1. Example of a load map 
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© 



© 



Entry address where initial transfer is made 

Name of load or library dataset containing modules to be loaded 

Names of blocks loaded from the named dataset. These are common 
blocks (identified by the slashes around their names, for 
example, /LABEL/) are names of program blocks. 

♦SYSTEM is always the first block listed in a relocatable load. 
It consists of the first 200 (octal) words of the user field, 
which is reserved for the Job Communication Block (JCB) . For an 
absolute load, *SYSTEM is not allocated. Therefore, the CAL 
user must set the origin to 200 (octal) via an ORG pseudo 
instruction to allow space for the JCB. If this is not done, 
the job aborts. 

Blank common, indicated as //, is allocated last and appears at 
the end of the list (if it has been defined) . 

10) Octal starting address of the block 

11) Octal word length of the block 

12) Date the object module was generated 



13J Operating system revision date at the time the object module was 
generated 



14) Name and revision level of the processor that generated the 
object module 



15) Revision date of the processor that generated the object module 



16j Comment (if any) from CAL COMMENT pseudo included in the load 
module 



17; Name of program block referenced 

13) Entry points in the program block 

19) Word address, parcel address, or value of each entry point 



20) Absolute parcel addresses of references to each entry point. 

Eight references are listed per line; some entry points have no 
references. 



21) Actual length of the binary; the minimum amount of memory 

required to load the program. FWA is the first word address of 
the load image. LWA is the last word address of the load 
image. The numbers in parentheses are (10) decimal and (8) 
octal . 
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SELECTIVE LOAD 

If the I keyword is present on the LDR control statement, one or more 
INCLUDE and/or EXCLUDE directives are examined in the specified dataset, 



Formats: 



INCLUDE, SDU=sdn , FN=fn ,MOD=*mdi :Tnd 2 : • - . :wd 50 . 



EXCLUDE, SDN=S<i«,FN=/n,MOD=md 1 :77?d 2 : • • • ^50' 



Parameters are in keyword form. 

SDN=s<2n Name of dataset containing modules to be selectively 

loaded. If SDN is specified without a value, the first 
dataset specified on the DN parameter of the LDR statement 
is the default. If the SDN parameter is omitted, an error 
message results, and the directive is skipped; the load 
does not abort. The SDN and FN parameters must refer to 
the same dataset. 

FH=fn File number of the specified dataset. A number from 

through 7. fn refers to the file by its numerical 
position in SDN or in the DN parameter of the LDR statement, 

For example, if DN=D1:D1:D2, the first file of Dl has an 
fn of 0, and the second file of Dl has an fn value of 
1. If FN is specified without a value, the default is 0. 
If FN is omitted, the whole of sdn is searched for the 
correct module; a message is issued for a complete sdn 
search. The SDN and FN parameters must refer to the same 
dataset . 

To load a module from the first file of Dl, the directive 
can include the parameter FN=0; however, if FN is specified 
without a value, the default is to load a module from the 
first file. 

JAOD^nd Module name or entry point to a module to be included or 

excluded from the load. Up to 50 modules can be specified; 
the modules must be separated by colons. If the MOD 
parameter is omitted, an error message results, and the 
directive is skipped. 



SR-0011 



Part 2 
9-13 



Example: Given the LDR statement 

LDR,DN=D1 :D1 :D2, . . . , I . 

A directive to load a module from the second file of dataset Dl includes 
the following directive in the next file of $IN: 

INCLUDE , SDN=Dl , FN=1 ,MOD= .... 
Selective load messages are never suppressed. 



PARTIALLY RELOCATED MODULES 

When a binary module is defined as a relocatable overlay, the loader can 
generate an image of the module that has been only partially relocated. 
The image of the binary module contains sufficient information for a user 
program to relocate all address references within the module program 
block according to the actual address where the user program determines 
the module should be executed. 

The relocatable overlay is useful because program modules are generated 
so that a common memory pool can execute the overlay and any of several 
overlays can execute at any address within the pool. 



GENERATION OF RELOCATABLE OVERLAYS 

The CAL assembler defines a module as a relocatable overlay at assembly 
time with the MODULE pseudo-op. 



Format: 



Location 


Result 


Operand 


ignored 


MODULE 


type 



Parameters: 

type A keyword parameter identifying the type of module being 

defined. RELOCOVL is the only type currently available. 

When the relocatable overlay is defined by the assembler, COS sets a 
special flag in the Program Description Table (PDT) for use by the 
relocatable loader. 
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The loader, recognizing that the current module being loaded is a 
relocatable overlay, performs limited relocation of the address 
references in the module. That is, all references to labeled common 
blocks and all references to entry points defined within other modules 
are adjusted according to the address where the other module resides in 
the memory image being constructed. References to blank common are 
illegal. It is also illegal for any other module to make any reference 
to any entry point defined to be within the relocatable overlay module. 
References from within the module to addresses within the module are not 
adjusted at this time. Instead, a copy of the necessary Block Relocation 
Table (BRT) entries is included in the memory image of the module. All 
BRT entries not needed for satisfying internal references are deleted. 

The absolute memory image of the program constructed by the loader 
contains the loaded programs, including all relocatable overlay modules. 

The relocatable overlays are physically located at the end of the memory 
image; all nonrelocatable overlay modules are loaded contiguously in the 
order they are encountered. Relocatable overlay modules can appear at 
any point in the load sequence and can be contained in libraries. The 
loader moves modules in memory as required to order the relocatable 
overlays at the end of the image. This placement of the overlays makes 
it possible for a user program to locate the images of each overlay and 
to copy the overlays to mass storage, if it is desired, in order to make 
the memory space used by the overlay images available for use by the 
program. 



MEMORY LAYOUT WHEN RELOCATABLE OVERLAYS EXIST 

When the loader has detected the existence of one or more relocatable 
overlays, memory is laid out in the following manner: 

1. All nonrelocatable modules, in the order they are encountered on 
load datasets or in libraries 

2. Labeled common blocks interspersed among the nonrelocatable 
modules so that a labeled common block precedes the absolute 
image of the first block encountered which defines the block 

3. All labeled common blocks defined first within a relocatable 
overlay module and not defined within any other type of module 

4. Images of all relocatable overlays in the order they are 
encountered on load datasets or in libraries 

5. Unsatified external (USX) program which is the loader's internal 
program for processing unsatisfied external references 



6. Blank common if defined by any program module 
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Note that the placement of USX and blank common can defeat the purpose of 
relocatable overlays, since the overlay images must remain reserved. 
With proper care, the program can use the space occupied by the overlay 
images for internal tables and other data with nonallocated space. 



MEMORY LAYOUT OF A RELOCATABLE OVERLAY IMAGE 

When the loader completes constructing the image of the complete program 
being loaded, the relocatable overlay portions have a different structure 
than do the nonrelocatable overlay portions. Normal modules are loaded 
as an absolute image with all loader-related tables removed. All address 
references, both internal to the module and to other modules, are 
adjusted so that the code executes correctly. If the C parameter is 
specified when the loader is called into execution, individual modules 
can begin immediately after the previous module, or they can begin at the 
next 16-word (decimal) boundary. 

Because relocatable overlay modules are expected by the loader to be 
moved to a different address for execution, the C specification has no 
meaning to a relocatable overlay module, and the first and subsequent 
such modules begin immediately after the last word of the previous module. 

Relocatable overlay module images also contain loader-relocated tables. 
These tables are required so that the user program can adjust address 
references within a relocatable overlay when it has determined the 
address where the overlay will execute. The tables are: 

PDT Program Description Table 

TXT Text Table 

BRT Block Relocation Table 

The PDT contains information regarding the number of entry points defined 
and the number of blocks and external references. The TXT contains a 
count of the words in the actual image of the code, followed by the 
semi-absolute image of the code. The BRT contains information necessary 
for adjusting address references within the module. If the user program 
wants to write the overlays to mass storage, the information in the PDT 
can be used to construct a directory or similar table for locating 
specific overlays or entry points, and then can be discarded. TXT and 
BRT must be retained in the mass storage copy for future relocation of 
address references. 
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OVERLAYS 

Very large programs might not fit in the available user memory space or 
might not use large portions of memory while other parts of the program 
are in execution. For such programs, the COS relocatable loader includes 
the ability to define and generate overlays — separating modules that 
the user creates and then calling and executing as necessary. 

Two types of overlays are available. 

• Type 1 overlays are generated by using the directives ROOT, 
POVL, and SOVL. Two levels of overlays in addition to the root 
overlay are allowed with calls to a maximum of 999 adjacent 
overlays. 

• Type 2 overlays are generated by using the directive OVLL. Ten 
levels of overlays in addition to the root overlay are allowed 
with calls to a maximum of 63 adjacent overlays. 

The overlay loader can also generate a partially relocated module, 
referred to as a relocatable overlay. Relocatable overlays have been 
fully described earlier in this section. 

The overlay structure, rules for overlay generation, and overlay calls 
for both types are described in this section. The control statements 
used to generate the overlay and the directives common to both types of 
overlays are described first. Specific rules for generation of Type 1 
and Type 2 overlays are described separately in the following subsections. 

Overlay generation consists of a load operation in which the loader 
performs relocatable loading and writes the resulting binary image to 
disk. One named absolute binary record is written per root and each 
overlay. 

If the LDR control statement has the parameter OVli=dir , the loader 
finds the overlay generation directives on the named dataset, dir. If 
no dataset is given (that is, OVL) , then the loader reads overlay 
generation directives from $IN. 



The format of the control statement is : 



LDR, . . . ,OVL=dir , . . . . 
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OVERLAY DIRECTIVES 

An overlay directive consists of a keyword and a parameter. A blank, 
comma, or open parenthesis must separate the keyword from the parameter. 
A period, closed parenthesis, or two consecutive blanks serve as the 
terminator. A caret at the end of the directive line indicates that the 
next line is a continuation of the current directive. The caret cannot 
be preceded by a blank; it must immediately follow the last character of 
the line. 



FILE directive 

The FILE directive indicates the dataset, dn , containing the routines 
to be loaded. This directive's function is similar to that of the DN 
parameter on the LDR control statement. It is generally the first 
directive on the directives dataset but appears at any time and as often 
as necessary thereafter. If no FILE directive appears, the loading 
proceeds from the dataset specified on the DN parameter of the LDR 
control statement. If that too has been omitted, loading initially 
occurs from $BLD. This directive is common to both overlay types. 



Format : 



file, dn. 



OVLDN directive 

The function of this directive is similar to that of the AB parameter on 
the LDR control statement. This directive names the dataset, dn, on 
which overlays are written. The dn parameter must be present. If no 
OVLDN directive is present, the default overlay binary dataset ($OBD) is 
assigned. All overlays generated following an OVLDN directive reside as 
separate binary records on dataset dn. OVLDN directives appear as 
often as desired. This directive is common to both overlay types. 



Format : 



OVLDN ,dn. 
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SBCA directive 

The SBCA directive sets the blank common starting address to the 
specified address. This directive allows the user to place blank common 
after all load modules in the current overlay structure. The address 
specified must be larger than any address used in the overlay structure. 
This directive must appear before any overlay generation directive, such 
as ROOT or OVLL. 



Format: 



SBCA, address. 



where address is the octal address assigned to blank common. 



TYPE 1 OVERLAY STRUCTURE 

Each Type 1 overlay is identified by a pair of decimal numbers, each from 
through 999. There must be one and only one root overlay; its level 
numbers are (0,0). This root remains in memory throughout program 
execution. Primary overlays all have level numbers {n,Q) where n is 
in the range 1 through 999. 

Primary overlays are called at various times by the root and are loaded 
at the same address immediately following the root. A secondary overlay 
is associated with a specific primary overlay. The secondary level 
numbers are (n,m) , where n is the primary level, and m is in the 
range 1 through 999. All secondary overlays associated with a given 
primary (that is, the same n) are loaded at the same address 
immediately following that primary. 

Only the root, one primary overlay, and one secondary overlay can be in 
memory at one time. 

Figure 9-2 is a diagram of a sample Type 1 overlay loading. The primary 
and secondary overlays are shown in time sequence. The sequence of 
generation does not imply that the routines are loaded into memory in the 
same sequence or that they remain in memory for a set period of time when 
they are executed. 

All external references must be directed toward an overlay nearer to the 
root. For example, overlay (1,0) can contain references to the root 
(0,0) but not to overlay (1,1). Overlay (1,1) can contain references to 
both (1,0) and (0,0) . 
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The loader places named common before the routine that first references 
it. All named common references must be directed toward a lower level 
routine. The lowest level routine with a named common block must contain 
data statements for that block. 

For example, in figure 9-2, 

MAIN can reference named common A only 

SUB1 and SUB2 can reference named common A and B only 

TEST can reference named common A, B, and C 

The loader allocates blank common immediately after the first overlay 
where it is declared. If blank common is declared in the root overlay 
(0,0), it is allocated at the highest address of the root overlay and is 
accessible to all overlays. If blank common is first declared in primary 
overlay (1,0) and not declared in the root (0,0), then it is accessible 
only to the (l,x) overlays. Allocation and placement of blank common 
is also manipulated by the user through the SBCA director. 

JCHLM is set to the highest address of the root overlay before loading. 
If a subsequent overlay module requires additional memory, JCHLM is reset 
to the highest address of that module. 



TYPE 1 OVERLAY GENERATION DIRECTIVES 

The overlay generation directives define the structure of the overlay. 
Included in this class are the ROOT, POVL, and SOVL directives. 



ROOT directive 

This directive defines programs, subroutines, and/or entry points 
comprising the load from dn. For programs written in CAL, list each 
entry referenced. FORTRAN programs need the program name only. All 
members for this directive reside on the same dataset, dn, as defined 
by the FILE directive. 



Format : 



ROOT ,member± ,membe2>2 ,member n . 
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200 f 



o 

e 

E 



JCHLM 



JOB COMMUNICATION 
BLOCK 



NAMED COMMON A 
PROGRAM MAIN 



NAMED COMMON B 
SUBROUTINE SUB1 



SUBROUTINE SUB2 



BLANK COMMON 



NAMED COMMON C f 

PRIMARY 

(1,0) 
(SUBROUTINE TEST I 



SUB- 
ROUTINE 
NEW1 



^T 



SECONDARY 

"•"J, 



SUB- 
ROUTINE 

NEW2 
(1,2) 



SUBROUTINE 
ALPHA 

_ i 2 '^__ 
SUBROUTINE 
BETA x 



SUBROUTINE 

DELTA 

(2,1) 



(5,0) 



(5,1) 



(5,2) 



ROOT (0,0) 



(5,3) 



JsL 



(3,0) 



(2,0) 



(2,3) 



unused 



1 1 me 



Figure 9-2. Example of Type 1 overlay loading 
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POVL directive 

This directive causes relocatable loading of the named blocks to the 
primary overlay with the name pleveli 000. The size of the root 
determines the base location. All members for this directive reside on 
the same dataset, dn. The first member in the list is the one that 
receives control when the overlay is loaded. For routines written in 
CAL, the first entry point of the first routine receives control. 



Format: 



POVL , pleve 1 , membev lf member 2 , . . . ,membev n . 



where plevel is between 1 and 999. 



SOVL directive 

This directive causes relocatable loading of the named blocks to the 
secondary overlay with the name plevel xslevel. The length of POVL 
{plevel :000) determines the base location. All members for this 
directive reside on the same dataset, dn. The first member in the 
list is the one that receives control when the overlay is loaded. For 
routines written in CAL, the first entry point of the first routine 
receives control. 



Format : 



SOVL, slevel ,member ^member 2> • • • ,membev n . 



where slevel is between 1 and 999. 

Generation directive example 

In the following example, 

DSET1 contains routines THETA, TEST, GAMMA, SUB1, MAIN, SUB2. 

DSET2 contains routines NEW2, ALPHA, OVER, NEW1, DELTA, EPSILON, 

SIGMA, BETA. 
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Format of the control statement that initializes overlay generation: 

LDR, . . . ,OVL=OVLIN, .... 
Dataset OVLIN contains the following directives: 



FILE,DSET1. 
OVLDN,LEV00. 



ROOT, MA IN, SUB 1 
,SUB2. 

POVL,l,TEST. 



FILE,DSET2. 
S0VL,1,NEW1. 

0VLDN,LEV12. 

S0VL,2,NEW2. 



Loader selectively loads from dataset DSET1. 

The following overlay modules are written to the 
dataset LEVOO. 

The absolute binary of MAIN,SUB1,SUB2 is 
written as the first record on dataset LEVOO. 

The binary of TEST is named 001:000 and is 
binary record 2 on dataset LEVOO. 

Loader selectively loads from dataset DSET2. 

The binary of NEW1 is named 001:001 and is 
binary record 3 on dataset LEVOO. 

The subsequent overlay modules are written to 
the dataset LEVI 2. 

The binary of NEW2 is named 001:002 and is 
binary record 1 on dataset LEVI 2. 



POVL, 2, ALPHA, BETA. The binary of ALPHA, BETA is named 002:000 and is 

record 2 on dataset LEV12. 



eof 



End of overlay load sequence 



TYPE 1 OVERLAY GENERATION RULES 

1. Overlay members are loaded from datasets named in FILE 
directives. Members are searched for in the most recently 
mentioned dataset only. In the absence of a FILE directive, 
members are loaded from the dataset specified on the LDR control 
statement. If that is also omitted, loading will initially 
occur from $BLD. Currently, the relocatable modules of all 
members for any overlay level must reside on the same file. 

2. The overlays are generated in the order of the directives. 
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3. There must be one and only one root. 

4. Level hierarchy must be maintained. The root overlay must be 
generated first; hence the ROOT directives appear first. 
Following the root generation, a primary overlay (POVL) is 
generated. No limitation is placed on which primary overlay 
number {plevel) is generated; however, all secondary overlays 

(SOVL) associated with the plevel must follow. The secondary 
overlay alevels can be generated in any order following their 
respective primary level. 

5. An end-of-file in the directives file ends the input of overlay 
directives; hence overlay generation. 

6. Any directive other than FILE, OVLDN, SBCA, ROOT, POVL, or SOVL 
causes a fatal error. 

7. The list of members can be continued to another line by using a 
caret immediately following the last character at the end of the 
directive line (that is, no blanks) . The A does not replace a 
separator and must not appear within a member name. 

8. Any number of lines can be used to name the members of an 
overlay. 



TYPE 1 OVERLAY EXECUTION 

A control statement call of the dataset containing the ROOT overlay 
initiates its loading and execution. If no OVLDN directives are used 
before generating the ROOT, the dataset $OBD contains the ROOT overlay. 

The following sequence executes the root overlay after generation: 

LDR,...,OVL=^iir,... . 
$OBD. 

During overlay generation the members are loaded from the FILE dataset 
in the order they appear on the dataset, regardless of their order of 
appearance in the members list. The entry for POVL and SOVL overlays is 
defined by the first member listed on the generation directive. Control 
is transferred to this address after loading by the $OVERLAY routine 
during program execution. The ROOT entry is named using the T parameter 
on the LDR control statement. 

The user calls for the loading of overlays from within the program, and 
the method by which they are called depends on the program language in 
use (FORTRAN or CAL) . OVERLAY is a subroutine of the root overlay and 
is loaded into memory with the root. 
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FORTRAN language call 

A FORTRAN program calls for the loading of overlays as follows: 



call OVERLAY (nldn, level lr level 2 tP) 



n Number of characters in the name 

L Left-adjusted; zero-filled. 

dn Name of the dataset where this overlay resides 

level-^ Primary level number of the overlay 

level 2 Secondary level number of the overlay 

r An optional recall parameter. If the user wishes to 

re-execute an overlay without reloading it, 6LRECALL is 
entered. If not currently loaded, it will be loaded. 

CAL language call 

A sample call sequence from a CAL program is as follows: 



Location 


Result 


Operand 




EXT 

• 


OVERLAY 

• 




• 
• 

CALL 


OVERLAY, (OVLDN, PLEV, SLEV) 

• 


OVLDN 

PLEV 

SLEV 


• 

CON 
CON 
CON 


A'LEV12'L 

2 





where OVLDN is the address of the dataset name, PLEV is the address of 
the primary level, and SLEV is the address of the secondary level. If 
recall is desired, the address of the literal 'RECALL' is transmitted as 
the fourth argument. 
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Example : 



Location 


Result 


Operand 


Comment 


1 


10 


20 


35 


RECL 


CALL 

• 
• 

CON 


OVERLAY, (OVLDN,PLEV,SLEV,RECL) 

• 

• RECALL' L 



For both FORTRAN and CAL language calls, during execution of the 
ROOT (0,0) program MAIN, the statement 

CALL OVERLAY (5LLEV1 2, 2,0) or the above CAL sample call 

causes OVERLAY to search dataset LEV12 for the absolute binary named 
002:000. OVERLAY positions the dataset LEV12 to the location of the 
absolute binary named 002:000 using information supplied by the loader, 
loads the overlay, and transfers control to the first member specified on 
the POVL or SOVL directive. After execution of the overlay, control 
returns to the statement in MAIN immediately following the CALL 
statement. Following the load, dataset LEV12 is positioned immediately 
after the end of record for the overlay (2,0). If overlay (2,0) is not 
on dataset LEV12, a fatal error results. 

Placing a call for a secondary overlay for which the corresponding 
primary overlay is not already loaded causes OVERLAY to load both 
overlays. Control transfers to the secondary after both overlays are in 
memory. A fatal error results if the primary and secondary overlays are 
not both on the named ovldn. If the overlays reside on different 
datasets, the user must place separate calls to load the overlays in the 
correct order. 



TYPE 2 OVERLAY STRUCTURE 

A Type 2 overlay is identified by a pair of decimal numbers indicating 
the overlay level and the number of the overlay within that level. The 
overlay notation is of the form (level, number) where the value of 
level is in the range 1 through 10 and the value of number is in the 
range 1 through 63. Only one root overlay exists; its level number is 
0. The root overlay remains in memory during the entire program 
execution and calls only level 1 overlays. 

Figure 9-3 shows a sample Type 2 overlay loading diagram. The overlays 
are shown in time sequence. The sequence of generation does not imply 
that the programs are loaded into memory in the same sequence or that 
they remain in memory for a set period of time when they are executed. 
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JOB COMMUNICATION 
BLOCK 
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Figure 9-3. Example of Type 2 overlay loading 
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Level 1 overlays are called at various times by the root overlay. Each 
call loads the named overlay at the same address, immediately following 
the location of the root. The first level overlay must be called by the 
root. Each upper level overlay is called by the associated overlay at 
the adjacent lower level. A hierarchy exists among overlay levels; an 
upper level overlay is subordinate to the proximate lower level 
overlay. An upper level overlay associated with overlay (2,1) might be 
(3,2), (3,3) or (3,4). 

An overlay can call into memory any overlay in the next higher level; it 
cannot call an overlay more than one level above it in the hierarchy. 
For example, overlay (2,1) can call (3,1) through (3,63), but it cannot 
call (4,1) . Each call for an overlay loads the named overlay at the 
same address location immediately following the location of the calling 
overlay. Only the root and one overlay at each level can be in memory 
concurrently. 

All external references must be directed toward an overlay nearer the 
root overlay. Overlay (1,1) can contain references to the root overlay 
but not to overlay (1,2) or overlay (2,1). The (2,1) overlay can 
reference externals in both the (1,1) overlay and the root overlay. 

The loader places named common blocks before the routine that first 
references it. All named common references must be directed toward a 
lower level routine (toward the root overlay) . If blank common is 
declared in the root overlay, it is allocated at the highest address of 
the root and is accessible to all overlays. If blank common is declared 
first in a level 1 overlay, for example, and is not declared in the root 
overlay, it is accessible only to level 1 and upper level overlays. 

JCHLM is set to the highest address of the root overlay before loading. 
If a subsequent overlay module requires additional memory, JCHLM is 
reset to the highest address of that module. 



TYPE 2 OVERLAY GENERATION DIRECTIVE 

The Type 2 overlay directive defines the structure of the overlay within 
the directive format. 



OVLL directive 

This directive causes relocatable loading of the named blocks of an 
overlay. The size of the lower level overlays in the group determines 
the base location. All members for this directive reside on the same 
dataset, dn, specified by the FILE directive. The first member in the 
list is the one that receives control when the overlay is loaded. For 
programs written in CAL, the first entry point of the first routine 
receives control. 



Part 2 
SR-0011 9-28 



Format : 



OVUL,level ,number , member ±, member 2, . . . ,member n . 



level Either a level number of the overlay (1 through 10) , or the 

root phase (0) . If the root phase is being generated, 
number must be omitted. 

number Number of the overlay (1 through 63) within the level 

member Module names for the individual overlays 

Generation directive example 

In the following example, 

DSET1 contains routines THETA, TEST, GAMMA, SUB1, MAIN, SUB2. 

DSET2 contains routines NEW2, ALPHA, OVER, NEW1, DELTA, EPSILON, 

SIGMA, BETA. 

Format of the control statement that initializes overlay generation: 
LDR, . . . ,OVL=OVLIN, . . . 



Dataset OVLIN contains the following directives : 

FILE,DSET1. Loader selectively loads from dataset DSET1. 



OVLDN,LEV00. 



The following overlay modules are written to the 
dataset LEV00. 



OVLL,0,MAIN,SUB1, The absolute binary of MAIN,SUB1,SUB2 is the first 
SUB2. record on dataset LEV00. 

OVLL, 1,1, TEST. The binary of TEST is binary record 2 on dataset 

LEV00. 



FILE,DSET2. 



Loader selectively loads from dataset DSET2. 



0VLL,2,1,NEW1. The binary of NEW1 is binary record 3 on dataset 

LEV00. 



OVLDN,LEV12. 



The subsequent overlay modules are written to the 
dataset LEV12. 
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OVLL,2,2,NEW2. The binary of NEW2 is binary record 1 on dataset 

LEVI 2. 

OVLL, 3,1, ALPHA. The binary of ALPHA is binary record 2 on dataset 

LEVI 2. 

OVLL, 3, 2, BETA. The binary of BETA is binary record 3 on dataset 

LEVI 2. 



eof End of overlay load sequence. 



TYPE 2 OVERLAY GENERATION RULES 

1. Overlay members are loaded from datasets named in FILE 
directives. Members are searched for in the most recently 
mentioned dataset only. In the absence of a FILE directive, 
members are loaded from the dataset specified on the LDR control 
statement. If that is also omitted, loading initially occurs 
from $BLD. 

2. The overlays are generated in the order of the directives. 

3. There must be one and only one root per dataset. 

4. Level hierarchy must be maintained. The root overlay must be 
generated first. Following the root generation, a first level 
overlay is generated. No limitation is placed on which overlay 
number is generated; however, all overlays associated with that 
first level overlay must follow. The overlays can be generated 
in any order; the same restrictions apply for all levels of 
overlays (1 through 10) . 

5. An end-of-file ends the input of overlay directives. 

6. Any directive other than FILE, OVLDN, SBCA or OVLL causes a 
fatal error. 

7. The list of members can be continued to another line by using a 
caret immediately following the last character at the end of the 
directive line (that is, no blanks) . The caret does not replace 
a separator and must not appear within a member name. 

8. Any number of lines can be used to name the members of an 
overlay. 
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TYPE 2 OVERLAY EXECUTION 

A control statement call of the dataset containing the root overlay 
initiates the root overlay's loading and execution. If no OVLDN 
directives are used before generating the root, the dataset $OBD 
contains the root overlay. All overlays reside on the datasets 
specified on the overlay directives. The entry for higher level 
overlays is defined by the first member listed on the generation 
directive. Control is transferred to this address after loading by the 
^OVERLAY routine during program execution. The root entry is named 
using the T parameter on the LDR control statement. 

The following sequence executes the root overlay after generation: 

LDR, . . . ,OVL=dir , . .. . 
$OBD. 

When the program is to be executed, the root overlay is brought into 
memory as a result of a control statement call in the job deck. 
Thereafter, additional overlays are called into memory by the executing 
program. Overlay loading allows any overlay to call for the loading of 
an adjacent upper level overlay. 

The user calls for the loading of Type 2 overlays from within the 
program, and the method by which they are called depends on the program 
language in use (FORTRAN or CAL) . OVERLAY is a subroutine of the root 
overlay and is loaded into memory with the root. 



FORTRAN language call 

A FORTRAN program calls for the loading of Type 2 overlays as follows: 



CALL OVERLAY (rihdn, level, number, r) 



n Number of characters in the name 

L Left-adjusted; zero-filled. 

dn Dataset name where this overlay resides 

level Level number of the overlay 

number Number of the overlay within the level 

p Optional recall parameter. If the user wishes to 

re-execute an overlay without reloading it, 6LRECALL is 
entered. If not currently loaded, it will be loaded. 
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CAL language call 

A sample call sequence from a CAL program is as follows: 



Location 


Result 


Operand 




EXT 

• 


OVERLAY 

• 




CALL 

• 


• 

OVERLAY, (OVLDN, PLEV, SLEV) 

> 


OVLDN 

PLEV 

SLEV 


• 

CON 
CON 
CON 


A'LEV12'L 

2 





where OVLDN is the address of the dataset name, PLEV is the address of 
the primary level, and SLEV is the address of the secondary level. If 
recall is desired, the address of the literal 'RECALL' is transmitted as 
the fourth argument. 



Example : 



Location 


Result 


Operand 


Comment 


1 


10 


20 


35 


RECL 


CALL 

• 
• 

CON 


OVERLAY, (OVLDN,] 

• 
• 

' RECALL 'L 


'LEV, SLEV, RECL) 



For both FORTRAN and CAL language calls, during execution of the ROOT 
program MAIN, the statement 

CALL OVERLAY (5LLE VI 2,1, 2) , or above CAL sample call 

causes OVERLAY to search dataset LEV12 for the absolute binary named 2. 
OVERLAY positions the dataset LEV12 to the location of the absolute 
binary named 2 using information supplied by the loader, loads the 
overlay, and transfers control to the first member specified on the OVLL 
directive. After execution of the overlay, control returns to the 
statement in MAIN immediately following the CALL statement. Following 
the load, dataset LEV12 is positioned immediately after the end of record 
for the overlay 2. If overlay 2 is not on dataset LEV12, a fatal error 
results. 
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OVERLAY GENERATION LOG 

When MAP is specified on the LDR control statement, a listing is obtained 
describing where each module is loaded and what entry points and external 
symbols are used for loading. This listing is an overlay load map and is 
similar to the map of a non-overlay load. A log of the directives used 
follows the map of the last overlay generated. If overlay loading 
aborts, the directives are not listed. 
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OBJECT LIBRARY MANAGEMENT 10 



BUILD is an operating system utility program for generating and 
maintaining library datasets. A libvavy dataset contains a program 
file followed by a directory file. Library datasets primarily provide 
the loader a means of rapidly locating and accessing program modules. 
The program file is composed of loader tables for one or more absolute 
or relocatable program modules. The directory file contains an entry 
for each program. The entry contains the name of the program module; 
the relative location of the program module in the dataset; and block 
names, entry names, and external names. 

The BUILD program constructs a library from one or more input datasets 
named by the user when BUILD is called. A library dataset created by 
a BUILD run can be used as input to a subsequent BUILD run. Through 
BUILD directives, the user designates the program modules to be copied 
from the input datasets to the new library and their order in the 
library. However, no directives or control statement parameters are 
needed for the most frequent application of BUILD, which is to add new 
binaries from $BLD to an existing library of binary programs, 
replacing the old binaries where necessary. 

BUILD does not use tape datasets. 



BUILD CONTROL STATEMENT 



Format : 



BUILD , I=idn , h=ldn , OGL=odn , B=bdn , NBL=ndn , SORT , NODIR, REPLACE . 



Parameters are in keyword form. 

I=idn Name of dataset containing BUILD directives, if any. 

Directives can be included in the $IN dataset, or they can 
be submitted in a separate dataset. 

If the I parameter appears alone or is omitted, all 
directives are taken from the $IN dataset, starting at its 
current position and stopping when an end-of-f ile is read. 
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If I=ddn, all directives are taken from the specified 
dataset, ddn, stopping when an end-of-file is read. 

If 1=0, no directives are read. The most common condition 
is to merge the modules from odn (the OBL dataset) with 
those from bdn (the B dataset) , replacing OBL modules 
with B modules whenever the names conflict, and to write 
the output to ndn (the NBL dataset) . Note that the input 
dataset specified by the B parameter corresponds to the 
binary output from CAL and CFT, also designated by B. 

h=ldn Name of list output dataset. 

If the L keyword appears alone or is omitted, list output 
is written to $OUT. 

If L=ldn, list output is written to Idn. 

If L=0, no list output is written. 

OBL=odn Name of the first input dataset, usually a previously 
created library dataset. 

If the OBL parameter is omitted or appears alone, the 
first dataset read is $OBL. 

If OBL=odn, the first dataset read is odn. 

If OBL=0, no old binary library exists. This is a 
creation run. 

B=bdn Name of the second input dataset, whose modules will be 

added to or will replace the modules in the first 
dataset. 

If the B parameter appears alone or is omitted, the 
second dataset read is $BLD. 

If B=bdn is specified, the second dataset read is 
bdn, which is read to the first end-of-file. 

If B=0, no modules are being added. This run edits an 
old library. 

\HBL,=ndn Name of the output dataset, usually a new library 

dataset. If the NODIR parameter is also present, ndn 
is not in library format. 

If the NBL parameter appears alone or is omitted, output 
is written to $NBL. 
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If UBL=ndn, output is written to ndn. 

If NBL=0, no output is written. 

SORT Specifies that all modules are to be listed 

alphabetically according to their new names. The 
default is to list the modules in the order they are 
first read. Note that SORT only applies to the list 
dataset and not to the output library. 

NODIR Specifies that no directory is to be appended to the 
output dataset, resulting in an ordinary sequential 
dataset like $BLD. The default is to append the 
directory. 

The dataset ndn specified by NBL is not rewound if 
NODIR is specified. 

REPLACE Specifies that the output library is to contain modules in 
the same order as the old library. If omitted, the new 
library contains modules from the old library which are not 
replaced by modules from the input binary dataset, followed 
by modules from the input dataset, whether the module from 
the input dataset replace modules from the old library, or 
are new, in the order encountered on the input dataset. 

Any of the following errors causes BUILD to abort: 

• A module specified explicitly in a COPY or OMIT directive is 
not in the current input dataset. 

• A module specified explicitly in a COPY directive has already 
been selected for output. 

• Improper syntax is used in the BUILD control statement or in 
the directive dataset. 

• An unrecognized directive or control statement keyword is used. 

• A dataset name or module name is too long or contains illegal 
characters. 



PROGRAM MODULE NAMES 

BUILD directives refer to program modules by their names as given in 
the directory or, if the directory is missing or is unrecognizable, by 
the names given in the program modules. 
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PROGRAM MODULE GROUPS 

In the COPY and OMIT directives, program modules with names containing 
one or more identical groups of characters can be specified together. 
To accomplish this, variable parts of each name are replaced by one or 
more hyphens. For example, XYZ- represents all names beginning with 
XYZ, including XYZ itself. In the extreme case, a name consisting of 
only a hyphen represents all possible names. 

In addition, up to eight asterisks can be used anywhere in a name as 
wild characters matching any character other than a blank. For 
example, GE* specifies a group of modules having 3-character names 
including GET and GEM but not GE or GEMS, although GE*S could 
represent GEMS. 



PROGRAM MODULE RANGES 

In order to facilitate the copying of large numbers of contiguous 
program modules, the COPY directive allows use of a range specifier 
instead of a single name or group specifier. The range specifier has 
the general form: 



(first,last) 



which means: skip to the first module specified and copy all modules 
from the first up to and including the last module specified. 



FILE OUTPUT SEQUENCE 

If the SORT parameter appears in the BUILD control statement, all 
modules are copied alphabetically according to their new names. In 
the absence of a SORT parameter, modules are written in the order they 
are originally read from the input datasets. 

The order of the entries in the directory is always the same as the 
order of the modules themselves. 
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FILE SEARCHING CONSIDERATIONS 

The user need not be aware of the order of modules in the input 
dataset unless (1) two or more modules have the same name or (2) a 
range is specified in a COPY directive. 

If two or more modules with the same name are in the input datasets, 
the last of the modules read is the one that survives, unless the user 
specifically omits that last module while its original dataset is the 
currently active input dataset. 

The concept of current position in the input file is used to interpret 
range specifiers where the first name is omitted as in (,last) or (,). 
In such cases, the current position is defined to be either immediately 
after the last module copied or at the beginning of the dataset if no 
modules have yet been copied. 



BUILD DIRECTIVES 

BUILD is controlled through directives in a dataset defined by the I 
parameter on the BUILD control statement. A directive consists of a 
keyword and, if the keyword requires it, a list of dataset names or 
module names. When names are required, the keyword must be separated 
from the first name by a blank; subsequent names (if any) in the list are 
separated from each other by commas. Extra blanks are optional except 
within the keyword. 

A line can contain more than one directive; periods or semicolons are 
used to separate directives on the same line from each other. A 
directive cannot be continued from one directive line to the next. 



Examples of directives: 

OMIT ENCODE, DECODE 

COPY **CODE. 
Examples of multiple directives on one line: 

FROM OLDLIB; LIST; OMIT ENCODE , DECODE , XLATE 

FROM $BLD. LIST. 
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FROM DIRECTIVE 

A FROM directive names a single dataset, which is thus established as 
the input dataset for succeeding COPY, OMIT, and LIST directives, or 
it lists several datasets that (except for the last dataset in the 
list) are to be copied in their entirety to the output dataset 
($NBL) . The last dataset in the list is established as the current 
input dataset, just as if it were specified alone in the FROM 
directive. If no COPY or OMIT directive follows, the last dataset is 
also copied in its entirety to the output dataset. 

An input dataset can be a library (with a directory) or an ordinary 
sequential dataset (such as $BLD) . BUILD always determines whether a 
directory is present at the end of the dataset and attempts to use it 
if it is there. A library dataset is treated as sequential if its 
directory file is unrecognizable any reason. 



Format : 



FROM dn^ t dn 2l . . . ,dn n 



The following rule allows the user to copy several datasets with one 
FROM directive or to omit COPY (which means copy all) when it would be 
the only directive (except for OMIT directives) in the range of a 
particular FROM directive: 

If any dataset named on a FROM directive is not acted on by any 
LIST or COPY directive, then BUILD copies all of the modules 
belonging to that dataset. BUILD takes this action when it 
encounters the next FROM dataset name or the end of the directive 
file, whichever comes first. 

If there are two input datasets to be read as soon as BUILD begins to 
execute (that is, if neither OBL=0 nor B=0 is specified) , the modules 
from these two datasets are treated as if they belong to a single 
dataset as far as the OMIT, COPY, and LIST directives are concerned. 
However, if either of them is named in a FROM directive, it is treated 
as a separate dataset and OMIT, COPY, and LIST directives apply only 
to whichever is the current input dataset. 



OMIT DIRECTIVE 

The OMIT directive allows a user to specify certain modules otherwise 
included in a group be omitted from the group on subsequent copy 
operations. An OMIT affects modules on the current input dataset 
only; its effect ends when a FROM directive is encountered. 
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Format: 



OMIT fn lr fn 2 ,...,fn 



Each /«£ can be one of the following: 

• A single name, such as $AB@CDEF or CAB22, by which binary 
records can be explicitly prevented from being copied, or 

• A group name, such as F$- or *AB**, by which binary records are 
prevented from being copied unless they are specified 
explicitly (that is, singly) in a COPY directive (see the 
introduction to this chapter under Program Module Groups for a 
description of * and - usage) . 

If an fn parameter specifies a module not in the input dataset or a 
group of modules having no representatives in the input dataset, a 
diagnostic message is included in the list output and BUILD aborts. 



COPY DIRECTIVE 

COPY directives cause BUILD to select the specified modules for 
copying from current input dataset to the output dataset. The user 
specifies single modules, groups of modules, or ranges of modules to 
be copied. If the user specifies a module not in the current input 
dataset, a diagnostic message is included in the list output and BUILD 
aborts. 



Format : 



COPY fn lt fn 2 ,...,fn n 



Each fn^ is either of the two forms valid in OMIT directives: 

• A single module name by which modules are explicitly selected 
for copying even if they belong to a group named in a previous 
OMIT directive, or 
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• A group specifier by which all the modules in the group are 
selected for copying unless they are specified either 
explicitly or implicitly in a previous OMIT directive. 

In addition, two special forms are allowed for each fn^ in COPY 
directives: 

• A form to rename a single module whose old name is specified 
explicitly; for example, OLDNAME=NEWNAME . (The name is changed 
both in the output directory and in the module's Program 
Description Table.) 

• A form to copy an inclusive range, as in (FIRST, LAST) , by which 
all the modules in the range are selected for copying unless 
they are specified either explicitly or implicitly in a 
previous OMIT directive. 

These two forms are mutually exclusive. A module copied by being 
included in a range cannot at the same time be renamed. Nor can 
either form accept a hyphen or asterisk specifying a group of modules. 



Examples : 

BUG=ROACH Copies BUG, renaming it to ROACH 

(LOKI,THOR) Copies all modules from LOKI through THOR 

(THOTH,) Copies all modules from THOTH to the end of the 
input dataset 

(,ISIS) Copies all modules from the current dataset 
position through ISIS 

(,) Copies all modules from the current dataset 

position to the end of the input dataset 

The current dataset position is defined as the beginning of the input 
dataset if no modules have been selected for copying yet, or else as 
the beginning of the record immediately after the last module that has 
been selected for copying . 



LIST DIRECTIVE 

The LIST directive tells BUILD to list the characteristics of the 
modules in the current input dataset. Its effect is immediate. 
(BUILD's standard list output describes the contents of the output 
dataset and is produced at the end of the run so as not to interfere 
with output triggered by LIST directives.) 
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Format: 




EXAMPLES 

The following are examples of various uses of the BUILD program: 

• Creating a new library dataset, using as input whatever binary 
modules have been written out to $BLD (for example, by CAL 
and/or CFT) . 

Control statements : 

BUILD, OBL=0, 1=0. 

SAVE , DN=$NBL , PDN=MLIB . 



Adding one or more modules to an already existing library 
dataset, again taking the input from $BLD. 

Control statements: 

ACCESS , DN=$OBL , PDN=MYLIB . 

BUILD, 1=0. 

SAVE , DN=$NBL , PDN=MYL IB . 



Any modules whose names were already in the directory of MYLIB 
are replaced by the new binaries from $BLD in the new edition 
of MYLIB that is created by BUILD and saved by the SAVE control 
statement . 



Merging several libraries. 

Control statements : 

ACCESS , DN=LIBONE , PDN=HERLIB . 
ACCESS , DN=LIBTWO , PDN=HISLIB . 
ACCESS , DN=ANOTHER , PDN= ITSLIB . 
ACCESS , DN=LASTONE , PDN=MYLIB . 
BUILD, I,OBL=0,B=0. 
SAVE , DN=$NBL, PDN=NEWLIB . 
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Directives: 

FROM LIBTWO, ANOTHER, LI BONE, LAS TONE 

The order of the dataset names in the FROM directives, not the 
order of the ACCESS control statements, determines the order of 

processing. If two datasets contain modules of the same name, 

the surviving module is the one in the dataset whose name 

occurs later in the FROM directive. (Any module could be 

renamed before input from a succeeding dataset is begun, in 

order to prevent it from being discarded. Note the section on 

File Searching Considerations in the introduction to this 

chapter for a description of the interaction with OMIT 

directives.) 

• Deleting a program module from a library. 

Control statements : 

ACCESS , DN=$OBL , PDN=MYLIB . 

BUILD, B=0. 

S AVE , DN=$NBL , PDN=MYL IB . 



Directive: 

OMIT BADPROG 

Extracting a program module from a library for input to the 
system loader, using the local dataset name $BLD as the 
intermediate file. 

Control statements : 

ACCESS, DN=XXX,PDN=MYLIB. 

BUILD , I , OBL=XXX , B=0 , NBL=$BLD, NODIR . 



Directive: 

COPY RUNPROG 
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PART 3 
JOB CONTROL LANGUAGE STRUCTURES 



INTRODUCTION 



The COS job control language allows three fundamental logic structures: 

• Simple control statement sequence. Control statements are 
processed one after another. 

• Conditional control statement block. A sequence of control 
statements is processed only if the specified condition is met. 

• Iterative control statement block. A sequence of control 
statements is processed repetitively until the specified condition 
is met. 

Most computer algorithms can be expressed in terms of the three above 
structures or as combinations of them. 

Just as FORTRAN programs can be divided into separate modules called 
subprograms, control statement sequences can be divided into modules 
called procedures. Procedures simplify control statement use in three 
ways: 

• Generalized procedures can be written to perform many similar 
tasks. Work is saved because a new control statement sequence 
need not be written to perform each separate task. 

• Complex control statement structures can be decomposed into 
separate subtasks, with a separate procedure written for each 
subtask. Such modularization reduces the job's design complexity 
and allows each subtask to be individually tested. 

• Procedure libraries can be built. Procedures need be defined only 
once and placed in a library; different jobs and users can use the 
procedures and make them part of their own control statement 
structures. 



SIMPLE CONTROL STATEMENT SEQUENCES 

A simple control statement sequence is a series of one or more of the 
control statements described in part 2 of this manual. The individual 
control statements are processed sequentially as described in part 1, 
section 3 of this manual. 
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CONDITIONAL CONTROL STATEMENT BLOCKS 

The conditional control statement block is a group of control statements 
that is processed only if a specified condition is met. The control 
statements IF, ELSE, ELSEIF, and ENDIF allow other control statements to 
be placed in a conditional block structure. 

• IF defines the beginning of a conditional block. 

• ENDIF defines the end of a conditional block. 

• ELSE is used to define an alternate condition. 

• ELSEIF defines an alternate condition to test when the previous 
one tested is false. 

ELSEIF and ELSE sequences are optional. Within a conditional block, only 
one ELSE sequence is permitted. The ELSE statement, if present, must be 
the last conditional statement in the block. An unlimited number of 
ELSEIF sequences can be used in a conditional block. 

The conditional block is first scanned to verify the validity of the 
block's syntax. If any syntax errors exist, the block is skipped without 
being evaluated and a job step abort error occurs. Note that any EXIT 
control statements within the conditional block are ignored when a syntax 
error exists in that conditional block. This validation occurs when the 
control statement file where it is contained is invoked (validation 
occurs at job initiation, if the control statement file is $CS) . 

Null blocks (for example, an ELSE statement immediately following an 
ELSEIF) are ignored without comment. 

Conditional blocks can be constructed in the following ways : 

• Basic conditional block 

• Conditional block with ELSE 

• Conditional block with ELSEIFs 

• Conditional block with ELSEIFs and ELSE 



BASIC CONDITIONAL BLOCK 

The format of a basic conditional block (figure 1-1) begins with an IF 
statement and ends with an ENDIF statement. When the IF statement 
expression is true, the control statement sequence that follows is 
processed. If the expression is false, the control statement sequence is 
not processed. 
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ENDIF. 




control statement 
sequence 



IF {expression) 



Figure 1-1. Basic conditional block structure 

Example : 

Following is an example of the conditional block structure. 

ACCESS , DN=MYPROG . 

MYPROG. 

EXIT. 

IF(PDMST.EQ.l) 



* < 

* 

* 



UNEXPECTED JOB STEP ABORT ERROR 



EXIT. 
ENDIF. 

In this example, if the ACCESS request or execution of MYPROG fails, the 
conditional block after the EXIT control statement is processed. The 
conditional block determines if the job step abort occurred because the 
ACCESS (for example, the dataset was not found) , in which case the 
processing of control statements resumes after the ENDIF control 
statement. If this is not the reason for the abort, the job terminates 
with the EXIT control statement. 



CONDITIONAL BLOCK WITH ELSE 

The second conditional block structure includes the ELSE control 
statement. The control statement sequence is processed if the expression 
on the IF statement is true. If the expression is not true, the sequence 
following the ELSE statement is processed. The block structure is 
illustrated in figure 1-2. 
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ENDIF. 




control statement 
sequence 




ELSE 




control statement 
sequence 




Figure 1-2. Conditional block structure including ELSE 



Example : 

An example of a conditional block structure using the ELSE statement 
follows. 

ACCESS , DN=INITJCL . 
ACCESS , DN=PREPROG . 
ACCESS, DN=PROG. 
PREPROG . 
IF(JSR.NE.O) 

CALL,DN=INITJCL. 

SWITCH, l=ON. 
ELSE. 

SWITCH, l=OFF. 
ENDIF. 
PROG. 

After PREPROG is executed, the conditional block determines if PREPROG 
has successfully executed (by its setting of JSR) . The procedure INITJCL 
is executed and a sense switch is set if JSR is nonzero. The sense 
switch is cleared if PREPROG set JSR to zero. 
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CONDITIONAL BLOCK WITH ELSEIF 

The third conditional block structure (figure 1-3) includes one or more 
ELSEIF statements. Each logical expression on the IF and ELSEIF 
statements is tested in sequence until a true condition is found; then 
the corresponding control statement sequence is processed. 



ENDIF. 




control statement 
sequence 



ELSEIF [expression) 




control statement 
sequence 




om x 

I F( expression) 



Figure 1-3. Conditional block structure including ELSEIF 

A conditional block can contain any number of ELSEIF control statements. 
The block of control statements following an ELSEIF statement is 
processed under the following conditions: 

• The expression for the IF statement is false. 

• All preceding ELSEIF statement expressions are false. 

• The ELSEIF expression is true. 

Example : 

An example of a deck including the ELSEIF statement is: 

IF(SYSID.EQ. 'COS 1.07') 

ACCESS, DN=$FTLIB, ID=V107. 
ELSEIF (SYSID.EQ. "COS 1.08") 

ACCESS, DN=$FTLIB, ID=V108. 
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ELSEIF(SYSID.EQ. 'COS 1.09') 
ACCESS, DN=$FTLIB,ID=V109. 
END IF. 
LDR,NOLIB f LIB=$FTLIB. 

This conditional block tries to access the correct version of the FORTRAN 
library, $FTLIB, for the execution of the loader following the 
conditional block. 



CONDITIONAL BLOCK WITH ELSEIF AND ELSE 

The conditional block structure in figure 1-4 uses ELSEIF and the ELSE 
statements. A block can contain any number of ELSEIF statements but can 
contain only one ELSE, which must be the last conditional statement 
before the ENDIF. 

The ELSE control statement sequence in this case is processed only if: 

• The expression on the IF statement is false, and 

• All ELSEIF statement expressions are also false. 




control statement 
sequence 



ELSEIF {expression) 




control statement 
sequence 



IF [expression) 



Figure 1-4. Conditional block structure including ELSEIF and ELSE 
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Example : 

This example is an expansion of the example for the third format and 
allows execution of the compiled program if there is enough time left and 
if the correct library is accessible. On a successful run, the dataset 
called RESULTS is disposed as a staged dataset. 

IF(TIMELEFT.GT.175) 

IF(SYSID.EQ. 'COS 1.08') 

ACCESS, DN=$FTLIB,ID=V108. 
ELSEIF(SYSID.EQ. 'COS 1.09') 

ACCESS ,DN=$FTLIB, ID=V109. 
ELSE. 

*. CURRENT SYSTEM LEVEL NOT RECENT ENOUGH 

* m 

EXIT. 

ENDIF . 

LDR,NOLIB,LIB=$FTLIB. 

SET,J1='YES'L. 
ELSE. 

SET,Jl='NOTIME'L. 
ENDIF. 
IF(Jl.EQ.'YES'L) 

D ISPOSE , DN=RESULTS , DC=ST . 
ELSE. 

* 

a 

*. JOB DID NOT RUN TO NORMAL COMPLETION 
ENDIF. 
EXIT. 



ITERATIVE CONTROL STATEMENT BLOCKS 

An iterative block (figure 1-5) contains a control statement sequence 
that is to be processed more than once during the processing of a job. 

• LOOP defines the beginning of an iterative block. 

• ENDLOOP defines the end of an iterative control statement block. 

• EXITLOOP defines the conditions under which the control statement 
block iteration is to end. 
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ENDLOOP. 



^a 




control statement 
sequence 



EX I TLOOP {expression ) 




control statement 
sequence 




Figure 1-5. Iterative block structure 



Iterative blocks are prescanned for syntax errors before actual 
processing begins. Any errors in the block structure cause a skipping of 
that block followed by a job step abort. If an iterative block is 
included within a conditional block, it must be totally contained within 
that conditional block. 



Example : 

The following example merges the two datasets DSIN1 and DSIN2 for 60 
records. 

SET,J1=0. 

SET,J2=60. 

LOOP. 

EXITLOOP(J2.EQ.O) 
IF(Jl.EQ.O) 
COPYR , I=DS INI , 0=OUTDS . 
SET,J1=1. 
ELSE. 
COPYR, I=DSIN2,0=OUTDS. 
SET,J1=0. 
ENDIF . 
SET,J2=J2-1. 
ENDLOOP. 
REWIND, DN=DSIN1 :DSIN2 :OUTDS . 
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PROCEDURES 

A procedure is a sequence of control statements and/or data that has 
been saved for processing at a later time. Procedures have two formats. 

• A simple procedure consisting of only the control statement body 

• A well-defined procedure consisting of a prototype definition 
statement, control statement body, and optional data. 



SIMPLE PROCEDURES 

A simple procedure is a series of control statements that does not reside 
in the primary control statement dataset ($CS) . No parameter 
substitution occurs in a simple procedure. 

Since a simple procedure has no name associated with it, a simple 
procedure can only reside in a non-library dataset. It therefore must be 
invoked with the CALL control statement without the CNS parameter. 



Example : 

The first file of dataset MOVER contains five control statements. The 
five control statements can be executed with the following procedure 
calling statement: 

CALL,DN=MOVER. 

In the above example, interpretation of control statements from dataset 
MOVER terminates when a RETURN statement is encountered (see part 2, 
section 2 of this manual), when the end of the first file (in dataset 
MOVER) is reached, or an EXIT statement. 



WELL-DEFINED PROCEDURES 

A well-defined procedure provides the capability of replacing values 
within the procedure body with values supplied from the procedure call . 
These values are called substitution parameters and are governed by the 
prototype statement of the procedure. 

A well-defined procedure can reside in a library or non-library dataset. 

Well-defined procedures are invoked (executed) in one of two fashions: 
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• Procedure name call. The procedure must first reside in a known 
control statement library (either $PROC or a local dataset named 
with a LIBRARY control statement) ; the procedure is called 

(invoked) by using the procedure name as the control statement 
verb. 

• CALL statement call. The procedure must reside in the first file 
of a separate dataset; the dataset is named in the CALL control 
statement. The CNS (crack next statement) parameter must be used 
for the operating system to properly recognize and process the 
procedure prototype statement. PROC and ENDPROC are not used with 
CALL. 

Well-defined procedures can be defined within the control statement 
stream {in-line definition) or as input to the BUILD utility.'" When 
an in-line procedure definition is encountered in the JCL control 
statement file, it is processed and written to the system default library 
$PROC. See example 8 in part 3, section 4 of this manual for an example 
of how to create a user permanent procedure library. 

A well-defined procedure can contain formal parameters that define what 
substitution is to occur in the procedure body. A character string that 
is eligible for substitution is listed in the prototype statement as a 
formal parameter specification. This name, when preceded by an 
ampersand in the definition body, indicates that a value is to be 
substituted during procedure invocation. COS replaces the ampersand and 
parameter name with corresponding value supplied by the procedure 
invocation. If the parameter listed in the prototype statement is not 
preceded by an ampersand in the body, substitution does not occur. If 
two ampersands precede the string, one is removed and substitution is 
inhibited. 

Any string consisting of one through eight characters (ampersand 
included) can be selected for substitution. 

When a statement in the current control statement file calls a procedure, 
COS searches the definition body for the character strings preceded by 
ampersands. For each occurrence, COS substitutes the values supplied by 
either the calling statement or the prototype statement. 



t BUILD currently does not suppport procedure entries in libraries. 
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JOB CONTROL LANGUAGE EXPRESSIONS 



Much of the power of the control statements described in part 3 of this 
manual derives from the use of expressions. Expressions allow 
operations such as incrementing counters, checking error codes, and 
comparing strings. 

An expression is a string consisting of operands and operators. 
Expressions are evaluated from left to right, honoring nested parentheses 
and operator hierarchy. This section begins by defining operands and 
operators, and ends with discussions of expression evaluation and strings. 



OPERANDS 

Expression operands are of four types: 

• Integer constants 

• Literal constants 

• Symbolic variables 

• Subexpressions 

INTEGER CONSTANTS 

An integer constant is a character string with two possible forms: 
+ ddd. . . 

nnn. . .B 

d is a decimal digit and n is an octal digit. 

An integer constant has an approximate decimal range (KJ I |<L0 19 . Range 
overflow is not detected and overflow results may be unpredictable. 
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LITERAL CONSTANTS 

A literal constant is a string of one to eight characters of the form: 

OGO • • * L 

vC/t? • • m i\ 

'eoe... 'H 

o is a character code with an ordinal number in the the range 040 
(octal) through 176. The value of a character constant corresponds to 
the ASCII character codes positioned within a 64-bit word. Alignment is 
indicated by the following suffixes: 

L Left-adjusted, zero-filled 
R Right-adjusted, zero-filled 
H Left-adjusted, space-filled 

If no suffix is supplied, H is assumed. 



SYMBOLIC VARIABLES 

A symbolic variable is a string of one to eight alphanumeric characters, 
beginning with an alphabetic character. 

A symbolic variable always has an associated value. COS defines a set of 
symbols when the job is initiated. Symbols are mnemonics for values 
maintained by COS and/or the user. The user can manipulate the group of 
symbols listed in table 2-1 through COS control statements or through 
system requests. 

Certain symbols allow communication between COS and the job being 
processed. Used in the JCL block control statements defined in part 3 of 
this manual, these symbols provide the user with powerful tools for 
analyzing the progress of a job. For example, a job can request the 
reason for an abort situation and proceed, based on the reply from COS, 
through the use of conditional control statements. Symbols that are 
preserved over subprocedure calls are called local to a procedure; they 
are saved when a subprocedure is called. Those that are not preserved 
are global over all procedures and can be altered by any procedure. 
Constants are symbols that are never altered. 

Information on predefined symbols is summarized in table 2-1. In table 
2-1, the only local symbols are JO through J7. 
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Table 2-1. Symbolic variable table 



Symbol 


Set by 


Range 


Description 


JO- J 7 


U 


Any 64-bit value 


Job pseudo-registers; represent 
user-alterable data local to a 
procedure. Each procedure level can 
be considered to have its own set of 
J registers. 


G0-G7 


U 


Any 64-bit value 


Global job pseudo-registers; 
represent user-alterable data global 
over all procedure levels. Data can 
be passed into or returned from 
procedures with the G registers. 


JSR 


U 


Any 64-bit value 


Job status register; previous job 
step completion code (normally 0) . 


FL 


S 


0-77777777 8 


Current job field length; can be 
set with MEMORY statement. 


FLM 


S 


0-77777777 8 


Maximum job field length; determined 
by JOB statement. 


SYSID 


I 


Literal value 


COS system level of the form 
'COS X.XX' 


SID 


I 


Literal value 


Mainframe identifier for front-end 
of job origin; 2 right-justified 
ASCII characters. 


SN 


I 


64-bit integer 


CPU serial number 


SSWrz 


S 


(l<n<6) 


Job pseudo sense switch settings; 
can be set with the SWITCH statement. 


ABTCODE 


S 


System error codes 
(See Appendix D) 

0-nnn 


COS job abort code; abort code 
corresponding to the last job step 
abort. The abort code corresponds 
to the abort message number (the 
nnn in bBnnn) issued by COS. 


TRUE 


I 


-1 


True value 


FALSE 


I 





False value 



U User 
S COS 
I System 



constant 
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Table 2-1. Symbolic variable table (continued) 



Symbol 


Set by 


Range 


Description 


TIME 


S 


Literal value 


Time of day in the form: hhimnr.ss 


DATE 


S 


Literal value 


Date in the form: mm/dd/yy 


TIMELEFT 


S 


64-bit integer 


Job time remaining in milliseconds 
as an integer value 


PDMFC 


S 


64-bit value 


Most recent user-issued Permanent 
Dataset Manager request. See 
Appendix D. 


PDMST 


S 


64-bit value 


Status of most recent Permanent 
Dataset Manager request. See 
Appendix D. 



U User 

S COS 

I System constant 



SUBEXPRESSIONS 



A subexpression is an expression that is evaluated so that its result 
becomes an operand. 



OPERATORS 

Expression operators are of three types: 

• Arithmetic 

• Relational 

• Logical 

These operators are used in the FORTRAN sense, 
are detailed in table 2-2. 



The expression operators 
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Table 2-2. Expression operator table 



Type 


Function 


Symbol 


Results 


A 


Addition 


+ 


64-bit sum of operands 


A 


Unary plus 


+ 


Following integer operand is positive. 


A 


Subtraction 


- 


64-bit difference of operands 


A 


Unary minus 


- 


Following integer operand is negative. 


A 


Multiplication 


* 


64-bit product of operands 


A 


Division 


/ 


64-bit quotient of operands 


R 


Equal 


.EQ. 


True/false 


R 


Not equal 


.NE. 


True/false 


R 


Less than 


• LT. 


True/false 


R 


Greater than 


.GT. 


True/false 


R 


Less than or 
equal 


.LE. 


True/false 


R 


Greater than or 
equal 


.GE. 


True/false 


L 


Inclusive OR 


.OR. 


A 1 bit in either operand sets 
corresponding bit in the result. 


L 


Intersection 


.AND. 


A 1 bit in both operands sets 
corresponding bit in the result. 


L 


Exclusive OR 


.XOR. 


A 1 bit is set in the result if 
either (but not both) corresponding 
bit in the operands is 1. 


L 


Unary complement 


.NOT. 


A 1 bit (or 0) is set in the result 
if the corresponding operand bit is 
(or 1) . 



A Arithmetic 
R Relational 
L Logical 
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ARITHMETIC OPERATORS 

All arithmetic operations are performed on 64-bit integer quantities. 
Care must be used with arithmetic operators because: 

• Multiplication/division underflow or overflow of the result is not 
detected, 

• Division by zero produces a zero result, and 

• Intermediate and final results are truncated. For example, 
2* (13/2) yields 12 whereas (2*13) /2 yields 13. 



RELATIONAL OPERATORS 

Relational operations return a -1 value for a TRUE result and a value 
for a false result. A value produced by an arithmetic or logical 
operation is considered true if it is a negative value. 



LOGICAL OPERATORS 

Logical operations return a 64-bit result. Their functions are 
performed on a bit-by-bit basis. 



EXPRESSION EVALUATION 

Expressions are evaluated from left to right, honoring nested 
parentheses. The operator hierarchy is: 

1. Multiplication and division 

2. Addition, subtraction, and negation 

3. Relational operation 

4. Complement (.NOT.) 

5. Intersection (.AND.) 

6. Inclusive OR (.OR.) 

7. Exclusive OR (.XOR.) 

Parentheses can be used to change the order of evaluation. For example, 
2+3*4 is evaluated as 14 whereas (2+3)*4 is evaluated as 20. 
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******************************************************* 

CAUTION 

Because COS does not check for type, the results of 
expression evaluation may not be as expected. For 
example, although both Jl.EQ.l and J2.EQ.2 are TRUE, 
(Jl .AND. J2) is FALSE. 

******************************************************* 



STRINGS 

A string is a group of characters which is to be taken literally as a 
parameter value. 

• Strings are normally delimited with apostrophes, in which case 
they are referred to as literal strings. 

• Strings can also be delimited with open and close parentheses, in 
which case they are referred to as parenthetic strings. 

Characters in a string can be any ASCII graphic characters (codes 040g 
through 176g) . Characters otherwise recognized as separator characters 
are not evaluated as such when part of a string. 



Examples: 

'SEPARATORS IN STRING, .=()• The literal string contains separator 

characters which are not interpreted as 
such. 

(ABC=DEF) The parenthetic string contains an 

equal sign which is not interpreted as 
a separator. 



LITERAL STRINGS 

Apostrophes are never treated as part of a literal string during 
evaluation except when doubled (see below) . Two adjacent literal 
delimiters are interpreted as a null string. 
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To continue literal strings across card images, place an apostrophe 
followed by a continuation character at the end of the line, and place 
the remainder of the string on the next card image preceded by an 
apostrophe . 



Example : 



. . . 'LITERAL STRING CONTINUED' A 
"ACROSS CARD IMAGES' 



This is the format for continuing 
literal strings across card images. 



An apostrophe within the string is indicated by doubling it. 

Example : 

'DON''T' The literal string is interpreted as DON'T. 

PARENTHETIC STRINGS 

Unlike literal strings, the delimiters of a parenthetic string are 
optionally treated as part of the string during evaluation (literal 
delimiters are never considered part of the string during evaluation) , 
depending on the type of preceding control statement separator. See part 
1, section 4 of this manual for a definition of control statement 
separators and their types. 

• If the preceding separator is an initial, parameter, equivalence, 
or concatenation separator, the outermost parentheses are not 
treated as part of the string during evaluation. 

• If the preceding separator is any other type of separator (that 
is, a continuation character or string delimiter) , the outermost 
parentheses are treated as part of the string during evaluation. 



Examples : 

KEYWORD= (ABC. DEF) 

KEYWORD= ( (ABC. DEF) ) 



ABC. DEF is the value assigned to 
KEYWORD. 

(ABC. DEF) is the value assigned to 
KEYWORD. 



'ABC. DEF' 



or 







ABC. DEF is the string value. 
Both are null strings. 
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To continue parenthetic strings, place a continuation character at the 
end of the line and the remainder of the string on the next card image. 
A string can be any length, depending upon the control statement 
parameter requirements. 



Example : 

. . . (PARENTHETIC STRING CON- A This is the format for continuing 
TINUED ACROSS CARD IMAGES) parenthetic strings across card 

images. 

The continuation and literal string delimiters are interpreted when 
included in a parenthetic string. 



Example : 

. . . : (STRING WITH 'EXTRA CLOSE PAREN ) ' ) . . . 

STRING WITH EXTRA CLOSE PAREN ) is 
the value of the string following 
the concatenation separator. 

...= (STRING CONTINUED ACROSS A 

CARD IMAGES)... STRING CONTINUED ACROSS CARD 

IMAGES is the value of the string 
following the equivalence 
separator . 
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CONTROL STATEMENT BLOCKS 



The COS job control language supports two types of control statement 
blocks: 

• Conditional control statement blocks. The user can identify 
control statements that are to be processed only if certain 
conditions are met. 

• Iterative control statement blocks . The user can identify 
control statements to be processed repetitively. 

See part 3, section 1 of this manual for an introduction to the use of 
control statement blocks. 

The following control statements identify control statement blocks: 

Verb Function 

IF Begin conditional block 

END IF End contitional block 

ELSE Define alternate condition 

ELSEIF Define alternate condition 

LOOP Begin iterative block 

ENDLOOP End iterative block 

EXITLOOP End iteration 



IF - BEGIN CONDITIONAL BLOCK 

The IF control statement defines the beginning of a conditional block. 
Each IF control statement must have a corresponding ENDIF control 
statement. IF is a system verb. 
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Format : 



IF (expression) 



Parameters: 



expression 



A valid JCL expression (see part 3, section 2 of this 
manual) . This parameter is required. 



ENDIF - END CONDITIONAL BLOCK 

The ENDIF control statement defines the end of a conditional block. 
ENDIF is a system verb. 



Format: 



ENDIF. 



Parameters: None 



ELSE - DEFINE ALTERNATE CONDITION 

The ELSE control statement is used to define an alternate condition. An 
IF statement, as well as any ELSEIF statements, must precede the ELSE 
control statement. If all conditions specified by the IF and ELSEIF 
statements that precede the ELSE in the conditional block test as false, 
then the sequence of statements that follow the ELSE statement is 
executed. ELSE is a system verb. 



Format: 



ELSE. 



Parameters : 



None 
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ELSEIF - DEFINE ALTERNATE CONDITION 

The ELSEIF control statement defines an alternate condition to test if 
the previously tested condition was false. The sequence of statements 
following the ELSEIF statement is executed when the ELSEIF expression is 
true. All ELSEIF control statements must precede the optional ELSE 
control statement for a conditional block. An ELSEIF statement without a 
previously processed IF statement results in a job step abort. ELSEIF is 
a system verb. 



Format : 



ELSEIF {expression) 



Parameters: 

expression 

A valid JCL expression (see part 3, section 2 of this 
manual). This parameter is required. 

A conditional block can contain any number of ELSEIF control statements. 
The block of control statements following an ELSEIF statement is 
processed under the following conditions: 

• The expression for the IF statement is false. 

• All preceding ELSEIF statement expressions are false. 

• The ELSEIF expression is true. 



LOOP - BEGIN ITERATIVE BLOCK 

The LOOP control statement is required to define the beginning of an 
iterative block. An ENDLOOP control statement is required at the same 
nesting level to terminate the iterative block. LOOP is a system verb. 



Format : 



LOOP. 



Parameters: None 
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ENDLOOP - END ITERATIVE BLOCK 

The ENDLOOP control statement terminates an iterative control statement 
block. If an ENDLOOP control statement occurs without a preceding LOOP 
statement at the same nesting level, a job step abort occurs. Execution 
of the ENDLOOP statement results in control being passed to the preceding 
LOOP statement which begins another iteration of the loop. 



Format : 



ENDLOOP. 



Parameters : None 



EXITLOOP - END ITERATION 

The EXITLOOP control statement defines the conditions under which the 
control statement block iteration is to end. If its expression is true, 
the loop is exited; if it is false, the control statements which follow 
are executed. 

An EXITLOOP statement that appears outside of an iterative block causes a 
job step abort. When nesting iterative control statement blocks, the 
EXITLOOP control statement defines the exit conditions for only the most 
immediate iterative block. EXITLOOP is a system verb. 



Formats: 



EXITLOOP. 

EXITLOOP {expression) 



Parameters: 

expression 



Optional valid JCL expression (see part 3, section 2 of 
this manual) . If omitted, an unconditional exit from the 
iterative block occurs. 
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PROCEDURES 



A procedure is a sequence of control statements and/or data that has 
been saved for processing at a later time. Procedures have two formats. 

• A simple procedure consists of only the control statement body. 

• a well-defined procedure consists of a prototype definition 
statement, control statement body, and optional data. 

See part 3, section 1 for an introduction to the use of procedures. 

Since simple procedures consist only of a control statement body, the 
rest of this section refers primarily to well-defined procedures. 
Well-defined procedures contain five elements as shown in figure 4-1. 




prototype statement 



PROC. 




COS control 
statements 



Figure 4-1. Procedure definition deck structure 
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• PROC defines the beginning of an in-line procedure definition 
block. 

• The prototype statement specifies the name of the procedure and 
identifies character strings within the procedure that are to be 
substituted when the procedure is called. COS uses values 
supplied with the procedure call and default parameter values from 
the prototype statement to replace these strings. 

• The procedure definition body is a sequence of COS control 
statements processed as part of the current control statement file 
when the procedure is called. It can optionally include lines of 
text data preceded in the definition body by an &DATA control 
statement. 

• &DATA introduces text information to be included in the procedure 
definition body, and names the dataset to be created and written 
to when the procedure is invoked. When the procedure is invoked, 
the named dataset is created and the text information is available 
in that local dataset, including any substitutions resulting from 
the call. This temporary dataset remains local and allows 
programs such as CAL or CFT to use the temporary dataset as source 
data. 

• ENDPROC indicates the end of an in-line procedure definition block. 

The first control statement in an in-line procedure is PROC; the last is 
ENDPROC. A prototype statement follows PROC providing the name of the 
procedure and optionally a list of parameters that identify the 
substitution values within the definition body. 

In addition to defining the values to be substituted, the prototype 
statement parameters control the selection or omission of the parameters 
and define the default value assignments. The control statements and 
data to be processed are contained in the definition body. The control 
statements are grouped in a sequence. 

If data is included in a procedure, the data is preceded by an &DATA 
statement and follows the control statement sequence. The &DATA 
statement also includes the name of the dataset to which the data is to 
be written after processing so that programs can use the data as source 
data. 

A definition can be placed within a definition; such nesting can occur to 
any level. However, nested definitions do not become defined until the 
outermost procedure is invoked. 
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PROC - BEGIN PROCEDURE DEFINITION 

The PROC control statement defines the beginning of an in-line procedure 
definition block. PROC is a system verb. 



Format : 



PROC. 



Parameters: None 



PROTOTYPE STATEMENT - INTRODUCE A PROCEDURE 

The prototype control statement has two functions: (1) to specify the 
name of the procedure and (2) to provide the formal parameter 
specifications that define where substitution is to occur within the 
definition body. Value substitution is described later in this section. 



Format: 



name,p lt p 2 ,Pzt • . . ,Vn- 



name Procedure name; 1 to 8 alphanumeric characters. The name 

should not be the same as a system verb; if it is, the 
results are unpredictable. 

Pi Formal parameter specifications, using one of the formats 

listed below. A formal parameter identifies a character 
string within the definition body. All formal positional 
parameters, if any, must precede all formal keyword 
parameters; if they do not, the procedure definition is in 
error and the job aborts. 

pos^ Positional formal parameter specification, or 

key^= dvalue ikvalue 

Keyword formal parameter specification as 
follows : 

key j! Formal keyword parameter 
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dvalue Optional default value; this 

value is substituted if entire 
keyword parameter is omitted from 
the calling statement. 

kvalue Optional keyed default value; 

this value is substituted if the 
keyword is present but no value 
is specified. 

Special cases: 

key^= Provides no default values and 

requires the caller to provide a 
non-null value. 

key^=i Provides no default values, 

but allows the user to specify 
key^= or just key^. 



PROCEDURE DEFINITION BODY 

The procedure definition body consists of a sequence of COS control 
statements processed as part of the current control statement file when 
the procedure is called. (It can optionally include lines of text data 
preceded in the definition body by an &DATA control statement. See 
&DATA below.) 

The prototype statement identifies character strings within the 
procedure that are to be substituted when the procedure is called. COS 
uses values supplied with the procedure call and default parameter 
values from the prototype statement to replace these strings. 

An ampersand (&) must precede each parameter to be substituted 
(substitution parameter) within the definition body. If a parameter 
appears in the prototype, a matching string in the body is found but not 
preceded by an ampersand, substitution does not occur. 
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&DATA - PROCEDURE DATA 

Data can be included within the procedure definition body after the 
procedure data card. 

The dn parameter creates a temporary dataset composed of the data 
identified in the procedure, including any substitutions resulting from 
the call. This temporary dataset allows programs such as CAL or CFT to 
use it as source data. 



Format : 



&DA1h,dn. 



dn Name of dataset to contain the data that follows; dn is 

required. 

The initial separator for an &DATA statement can be a blank, comma, or 
an open parenthesis; the statement terminator can be a blank, period, or 
a close parenthesis. 

An &DATA specification cannot be continued to subsequent cards. All 
card images following an &DATA card up to the next &DATA card are 
written to the specified dataset after string substitution is 
performed. See example 7 later in this section. 



ENDPROC - END PROCEDURE DEFINITION 

The ENDPROC control statement indicates the end of an in-line procedure 
definition block. ENDPROC is a system verb. 



Format: 



ENDPROC. 



Parameters : None 
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PARAMETER SUBSTITUTION 

Formal parameter specifications (see part 3, section 1) can be selected 
for substitution. Character strings to be substituted are delimited by 
any character other than numerals, alphabetics, commercial at (@) , 
dollar sign ($) , and the percent sign (%) . An ASCII underline is used 
as a string delimiter when the next character is one of these 
characters. See example 3 later in this section. COS deletes the 
underline after evaluating the string it delimits. Thus, the underline 
concatenates the strings it delimits. 

Formal parameter specifications can be in positional or keyword format. 



POSITIONAL PARAMETERS 

Positional formal parameters allow the user to list the strings within 
the body that can be substituted. The calling statement lists values to 
be substituted for these strings in the same order in which they are 
listed in the prototype statement. The value supplied with the calling 
statement is substituted for every occurrence of the corresponding 
formal positional parameter within the definition body. If the caller 
passes too few positional parameters, null strings are substituted for 
the remaining formal positional parameters. If too many positional 
parameters are passed, the procedure call is in error and the job aborts. 



KEYWORD PARAMETERS 

Keyword formal parameters are listed in any order after all positional 
parameters are given on the prototype statement and the calling 
statement. A keyword formal parameter allows the user to specify 
substitution values on the prototype statement that are to be used when 
one is not given on the calling statement. 

If the keyword formal parameter is included in the calling statement 
with a value, that value is substituted. If the entire keyword formal 
parameter is omitted from the calling statement, the default value on 
the prototype statement is substituted. If a default value is not 
provided on the prototype statement, the character string within the 
body corresponding to that formal parameter is not included in the 
procedure expansion. 

If only the keyword portion of the keyword formal parameter (the 
character string itself) is included in the calling statement, without a 
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value assigned to it, then a keyed default value from the prototype 
statement is substituted. If a keyed default value is not provided on 
the prototype statement, again the character string within the body 
corresponding to that formal parameter is not included in the procedure 
expansion. 

A keyword parameter enclosed in apostrophes ( , KEY , =value) is 
considered a positional parameter. 

The forms of keyword substitution are summarized in table 4-1. 



Table 4-1. Keyword substitution after expansion 





Keyword 














Format For 












Calling"* 


^ Prototype 


key 


key- -.kvalue 


key=dvalue -.kvalue 


key= 




Statement 


\. Statement 


(key) 


key=: (kvalue) 


key= (dvalue) -.kvalue 
key=dvalue-. {kvalue) 


key=dvalue 
key- (dvalue) 




1 . name , 


value. 


Value 


Error CS119 


Error CS119 


Errors CS119 


and CS122 


2. name. 


key. 


Key 


kvalue 


kvalue 


Error CS121 




3 . name . 




Null 


Error GP003 


(Lvalue 


Error CS122 




name. 


{null) . 












4 . name , 


key-value. 


Value 


Value 


Value 


Value 




5 . name. 


key. 


Error GP003 


Error GP003 


Error GP003 


Error GP003 





Error messages 

CS119 - EXTRA POSITIONAL PARAMETER: n 

CS121 - KEYWORD USED WITHOUT ASSIGNING IT A VALUE: 

CS122 - NO VALUE WAS ASSIGNED TO n 

GP003 - KEYWORD keyword MUST BE SPECIFIED 



POSITIONAL AND KEYWORD PARAMETERS 

When supplying both positional and keyword parameters, all positional 
parameters must precede all keyword parameters; COS evaluates the call's 
positional parameters first. The end of the caller's list of positional 
parameters is signaled by the appearance of a keyword parameter, 
statement terminator, or by specifying all positionals. 
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APOSTROPHES AND PARENTHESES 

Sometimes parameter values in a procedure definition or a procedure 
calling statement require a special format. If a literal string (a 
string delimited with apostrophes) appears in either of these 
statements, it is processed as if it were a literal constant. That is, 
all apostrophes in the value remain when the value is substituted. See 
example 5 later in this section. 

To avoid any possibility of erroneous processing, use parentheses as 
string delimiters in these statements. Outermost parentheses preceded 
by the initial, parameter, equivalence, or concatenation separators are 
removed during value substitution. This procedure delays processing of 
any separator characters in the string until the statement itself, with 
substituted values, is processed. 



This delay is also required when specifying multiple values for the 
default value and/or keyed default value parameters on a procedure 
definition statement. See examples 1, 2, 4, and 6. Parentheses are 
advised in the procedure calling statement when the use of the value 



xn 



the procedure statements is unknown, 
this section. 



See examples 4, 5, and 6 later in 



The forms of parenthetical substitution are summarized in table 4-2. 



Table 4-2. Expansion of parenthetic and 
literal string values 



Invocation 


Expansion 


value 

{valuel=value2) 
valuel ' . • value2 
valuel (.) value2 


value 

valuel=value2 
valuel' . 'value2 
valuel . value2 



Examples : 

The following examples demonstrate the COS control statement procedure 
substitution process. 
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Example 1: 

Consider a single statement procedure called LOAD defined as follows: 

Definition 

PROC. 

LOAD,NOGO=:NX,LIBRARY=($FTLIB:$SYSLIB) :MYLIB. Prototype Statement 

LDR, &N0G0,LIB=&LIBRARY. Definition body 

ENDPROC. 

The prototype statement in this example defines two formal parameters, 
both of which are in keyword format. The keyword NOGO has a null value 
when omitted from the calling statement and a value of NX when included 
on the calling statement in keyword -only format. The keyword LIBRARY 
has the default value of $FTLIB:$SYSLIB. When LIBRARY is used in the 
calling statement without a value, the keyed default value, MYLIB, is 
substituted. 

When the LOAD procedure is invoked, it expands to a single statement 
whose form depends on the choice of parameters: 

Invocation 

LOAD, NOGO. 

LOAD. 

LOAD , LIBRARY=THISLIB . 

LOAD , LIBRARY , NOGO . 

Expansion 

LDR,NX,LIB=$FTLIB:$SYSLIB. 
LDR, , LIB=$FTLIB :$SYSLIB . 
LDR, ,LIB=THISLIB. 
LDR,NX,LIB=MYLIB. 



Example 2 : 

The following in-line procedure definition creates a procedure called 
BLDABS. 

Definition 

PROC. 

BLDABS, SOURCE, LIST, GO='NO' :'YES',LIB=A 

: (3SYSLIB :$FTLIB) ,MAP=FULL:PART. Prototype statement 

REWIND , DN=$BLD : &SOURCE . 

CAL, I=&SOURCE,L=&LIST, ABORT. 

LDR,NX,LIB=SLIB,MAP=&MAP,L=&LIST,AB=$ABD. 

rewind, DN=3ABD:&LIST. Definition body 
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SAVE , DN=$ABD , PDN=MYPROGRAM . 

IF(&GO.EQ. *YES') 

$ABD. 

ENDIF. 

ENDPROC. 

Invocation 



BLDABS,WORK, ,GO,LIB=VLIB2. 

Expansion 

REWIND , DN=$BLD : WORK . 

CAL , I=WORK , L= , ABORT . 

LDR, NX, LIB=VLIB 2, MAP=FULL , L= 

REWIND, DN=$ABD:. 

SAVE , DN=$ABD , PDN=MYPROGRAM . 

IF('YES'.EQ. 'YES') 

$ABD. 

ENDIF. 



Example 3 : 

This procedure exemplifies the proper use of the underscore character for 
the definition of a formal parameter. It creates a procedure called 
AUDJCL. 

Definition 

PROC. 

audjcl, dn, level, L=$OUT:AUDLST. Prototype statement 

audit , pdn=&dn&level_jcl , ID= JCL , L=&L . Definition body 

ENDPROC. 

Invocation 

AUDJCL,-, 05. 

Expansion 

AUDIT , PDN=-0 5JCL , ID= JCL , L=$OUT . 



Example 4 : 

Parentheses are required when specifying multiple values for a single 
parameter value on a procedure definition prototype statement or on a 
calling statement. In these cases, the colon is used to separate default 
and Boolean values in a keyword parameter. For example: 
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Procedure-definition prototype statement 

MYPR0C,P0S1,KEY=(DEF1:DEF2) : (B001:B002) . 

Invocation 

MYPROC, (P0S1A:P0S1B) . 

When substitution occurs during this call, P0S1A:P0S1B replaces all P0S1 
occurrences within the definition body. Both values (P0S1A and P0S1B) 
are evaluated separately during control statement evaluation. If 
apostrophes are on the call, ' P0S1A:P0S1B' is evaluated as one literal 
string. 



Example 5 : 

The following procedure definition exemplifies the use of literal strings 
instead of parenthetical strings. 

Definition 

PROC. 

PURGER,PDN,ID,ED,M. Prototype 

ACCESS, DN=$PURGE,PDN=&PDN,ID=&ID,ED=&ED,M=&M,UQ,NA. 

DELETE, DN=$PURGE,NA. Definition body 

RELEASE , DN=$PURGE . 
ENDPROC . 

Invocation 



PURGER , ' SOURCE . MAIN ' , PROJECT . 

Expansion 

ACCESS , DN=$PURGE , PDN= ' SOURCE . MAIN ' , ID=PRO JECT , ED= ,M= , UQ , NA . 
DELETE , DN=SPURGE , NA . 

The apostrophes remain as part of the string in the expansion. If 
parentheses had been used in the invocation instead of apostrophes for 
the permanent dataset name, (SOURCE. MAIN) , the value when the ACCESS 
statement is evaluated would be SOURCE. MAIN because the outermost 
parentheses are removed when preceded by a valid separator. This action 
would cause an error because the period in SOURCE. MAIN would be evaluated 
as a statement terminator during evaluation. 
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Example 6 : 

The following example illustrates the use of parenthetical strings 
instead of literal strings in a procedure definition. 

Definition 

PROC. 

LGO,CALS0RC,ABS,NLIB=$SCILIB: ($SCILIB: A 

SSYSLIB :$FTLIB) . Prototype 

CAL,I=&CALSORC. 

ldr,nx,ab=&abs,nolib=&nlib. Definition body 

ENDPROC. 

Invocation 

LGO, , ,NLIB. 

Expansion 

CAL,I=. 

LDR, NX, AB= , NOLIB=$SCILIB : $SYSLIB : $FTLIB . 

Parentheses were not included for the expansion of the NLIB keyed default 
value because parentheses are removed during processing when preceded by 
the concatenation delimiter (:). 

If apostrophes had been used instead of parentheses for the NLIB 
parameter value, the colons would have been ignored as separators during 
expansion. Also, apostrophes are treated as part of the value when 
included in a procedure definition prototype statement or a calling 
statement. Therefore, if apostrophes had been used, the following 
expansion would have occurred. 

CAL,I=. 

LDR, NX, AB= , NOLIB= ' $SCILIB :$SYSLIB :$FTLIB ' . 

When the LDR statement is executed, the value assigned to the NOLIB 
parameter is the literal string $SCILIB:$SYSLIB:$FTLIB which violates the 
syntax for the NOLIB parameter. 



Example 7: 

Consider the following procedure definition. This procedure is used to 
retrieve specified source decks from an UPDATE program library by the use 
of the &DATA option. 
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PROC. 

GDECK,plname,masterch,deckrnge. Prototype statement 

ACCESS , DN=&PLNAME . 

UPDATE, I=Q.ZRRZQ2,Q,C=0,S,P=&PLNAME. 

RELEASE,DN=QZRRZQ2:&PLNAME. Definition body 

&DATA QZRRZQ2 

&MASTERCH_COMPILE &DECKRNGE 

ENDPROC. 

Two sample invocations and their expansions follow: 

Invocation Expansion 

GDECK,COSPL,*, (ST,CT) . ACCESS , DN=COSPL . 

UPDATE, I=QZRRZQ2,Q,C=0,S,P=COSPL. 
RELEASE, DN=QZRRZQ2 :COSPL. 

(Dataset QZRRZQ2 contains : 
♦COMPILE ST,CT) 

GDECK,FTLIBPL,*, (COS.RFD) . ACCESS, DN=FTLIBPL. 

UPDATE, I=QZRRZQ2,Q,C=0,S,P=FTLIBPL. 
RELEASE, DN=QZRRZQ2 :FTLIBPL . 

(Dataset QZRRZQ2 contains : 
♦COMPILE COS.RFD) 



Example 8 : 

Ths example illustrates one mechanism for defining and maintaining user 
procedure libraries. Note the new procedure library is saved on mass 
storage for later use. 

ACCESS , DN=GENLIB . 
CALL,DN=GENLIB. 

The permanent dataset GENLIB contains: 

ECHO, OFF. 
RELEASE , DN=$PROC . 
*. 

*• Define procedure for ACCESS of commonly used ID. 

* m 

PROC. 

UQ,DN,ED=:1,PDN=:GENLIB,R=:READCW,W=:WRITECW,M=:MAINCW,NA=:NA. 

ACCESS, DN=&DN,ID=MYUID,PDN=&PDN,ED=&ED,R=&R,W=&W,M=&M,NA=&NA. 

RETURN. 

EXIT. 

RETURN, ABORT. 

ENDPROC. 
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* w 

*. Edit a local dataset. 
* 

PROC. 

ED , DN , AC= : ' ACCESS ' . 

IFC&AC'.EQ. 'ACCESS') 

UQ,&DN. 
END IF 

TEDI,DN=&DN. 
RETURN. 
EXIT. 

RETURN, ABORT. 
ENDPROC. 
* 

« 

*. End of definitions 

* m 

UQ,PROCLIB,NA. 

SAVE , DN=$PROC , PDN=PROCLIB , ID=MYUID . 

DELETE , DN=PROCLIB , NA . 

RELEASE , DN=$PROC . 

ACCESS , DN=PROCLIB , ID=MYUID . 

L IBRARY , DN=* : PROCLIB . 

ECHO, ON. 



Part 3 
SR-0011 4-14 



APPENDIX SECTION 



JOB USER AREA 



JOB TABLE AREA - JTA 

Each job has an area referred to as the Job Table Area (JTA) preceding 
the field defined for the user. A JTA is accessible to the operating 
system but not to the user. The format of a JTA is described in the COS 
Table Descriptions Internal Reference Manual, CRI publication SM-0045. 
The Job Table Area contains job-related information such as accounting 
data; a JXT pointer; sense switches; an area for saving B, T, and V 
register contents, control statement and logfile DSPs; and buffers; a 
copy of the user's LFTs; and a Dataset Name Table (DNT) for each dataset 
used by the job. 



JOB COMMUNICATION BLOCK - JCB 

Following the JTA is a 128-word block referred to as the Job 
Communication Block (JCB) . The user accessible JCB contains a copy of 
the current control statement for the job and other job-related 
information. 

Figure A-l illustrates an expansion of the JCB. 



16 






8 


16 24 32 40 


48 


56 


63 


(Available for scratch space) 


CCI 


CPR 



Figure A-l. Job Communication Block (JCB) 
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16 



24 



32 



40 



48 



56 



63 



JN 



I //////// 



LPP I//////IUI 



HLM 



FL 



NPF 



I 



BFB 



DSP 



NLE 



I 



MFL 



LFT 



flags 



I /////////////////////////////// I PNST | STRM 



^ 



I CYCLI CPTP I/////////////////////////////////////////// 



OVL 



~-\ 



SCB 



CRL 



ACN1 



ACN2 



I//////// 



PWD1 



PWD2 



PROM 



///////////////I 



PLEV 



I LEV 



CLEV 



MMIN 



MMIS 



MMBA 



MMEP 



STIN 



7T3 



STRT 



STIS 



////////////////////////////////I 



AVBA 



Reserved 



102 



LDR 



116 



//////////////////////////////////////////////////////////////// 
//////////////////////////////////////////////////////////////// 



BDAT 



BTIM 



DIG 



127 



Figure A-l. Job Communication Block (JCB) (continued) 
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Field 
JCCCI 

JCCPR 



Word 



5-15 



16-63 



Bits 



0-63 



0-63 



JCJN 


64 


0-55 


JCLPP 


65 


0-7 


JCU 


65 


14-15 


JCUL 
JCUG 




14 

15 


JCHLM 


65 


16-39 


JCFL 


65 


40-63 


JCNPF 


66 


0-15 


JCBFB 


66 


16-39 


JCDSP 


66 


40-63 


JCNLE 


67 


0-15 


JCMFL 


67 


16-39 


JCLFT 


67 


40-63 


Flags: 
Reserved 
JCCSDB 
JCBP 
JCMRF 


68 


0-16 


1 
2 
3 


JCIOAC 




4 


JCIOAP 




5 


JCIA 
JCCHG 




6 
7 



JCJBS 



Description 

Control statement image packed 8 
characters per word 

Control statement parameters , 
expanded to 2 words per parameter 

Job name; bits 56-63 must be 0. 

Lines per page 

User-managed field length reduction 
mode indicator 

Local user mode (this job step only) 

Global user mode 

High limit of user code 

Current field length 

Number of physical buffers and 
datasets 

Base address of I/O buffers 

Base address of DSP area 

Number of entries in LFT 

Maximum field length allowed the job 

Base of LFT 



Reserved 

CSP Debug flag 

JOB Statement Breakpoint (BP) flag 

Memory Request flag. If set, dynamic 

field management by CAL, LDR f etc. is 

not allowed. 

I/O Area Current Status flag : 

User's I/O area is unlocked 

1 User's I/O area is locked 
I/O Area Previous Status flag : 

User's I/O area is unlocked 

1 User's I/O area is locked 
Interactive flag 

Execute CHARGES utility for trailer 

message 

JOB Statement flag (if set, JOB 

statement just processed) 
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Field 



Word 



Bits 



Description 



JCCSIM 
JCDLIT 

JCRPRN 
JCVSEP 
JCSDM 

JCPDMS 

JCCSQ 

JCOVT 



JCPNST 



JCSTRM 



JCEFI 



68 



68 



69 



9 

10 

11 
12 
13 

14 
15 
16 



48-55 



56-63 



JCOVL 


69 




1 


JCSBC 


69 




2 


JCCYCL 


69 




5-20 


JCCPTP 


69 




21-29 


JCCRL 


70 




0-63 


JCCRLS 


70 




32-63 


JCACN 


71- 


72 


0-63 



JCACN1 
JCACN 2 



71 
72 



0-63 
0-55 



Flag is set when COS simulator is 

running. 

Display literal delimiters in control 

statement crack. 

Retain level 1 parentheses 

Last character was valid separator. 

Do not echo control statement to user 

log file 

Suppress PDM logfile messages 

New CFT calling sequence in effect 

Overlay type : 

Pre-COS 1.12 overlay 

1 COS 1.12 or later overlay 

Parentheses nesting level for current 
control statement 

Statement termination for current 
control statement 

Enable Floating Interrupt flag; used 
by $FTLIB math routines to reset 
Floating-point Interrupt flag 

Overlay flag 

SBCA flag 

CPU cycle time in picoseconds 

CPU type (GCRAYl, QCRAY1S, @CRAYXMP) 

COS revision level 

COS revision number 

1 through 15 character account number 
(set to zero except during ACCOUNT 
processing) 

Characters 1 through 8 of account 

number 

Characters 9 through 15 of account 

number 



JCPWD 



73-74 0-63 1 through 15 character password (set 

to zero except during ACCOUNT 
processing) 
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Field 



Word 



JCPWD1 


73 


JCPWD2 


74 


JCPROM 


75 



JCSTIS' 

jcavba'' 

JCLDR 
JCBDAT 

JCBTIM 

JCDIG 



119 



Bits 

0-63 
0-55 

0-63 



JCPLEV 


76 


16-31 


JCILEV 


76 


32-47 


JCCLEV 


76 


48-63 


Jomm f 


77 


0-31 


JCMMIS f 


77 


32-64 


JCMMBA f 


78 


0-31 


JCMMEP*" 


78 


3 2-64 


JCSTIt/ 


79 


0-30 


JCSTRT^ 


79 


31 



79 


32-64 


80 


32-64 


102-115 


0-63 


118 


0-63 



0-63 



120-127 0-63 



Description 

Characters 1 through 8 of password 
Characters 9 through 15 of password 

Current user job interactive prompt, 
1-8 ASCII characters, left-justified, 
zero-filled. 64 bits of binary 
zeroes disables user job prompt. Set 
to system default at beginning of 
each job step. 

Current procedure nesting level 

Current iterative nesting level 

Current conditional nesting level 

Size of increments to managed memory 
area 

Initial size of managed memory area 

Base address of managed memory area 

Size of smallest memory area to be 
added to managed area 

Size of increments to a stack 

Flag for stacks already in use 

No 

1 Yes 

Initial size of a stack 

Pointer to base of available free 
space 

Unsatisfied externals 

Date of absolute load module 
generation 

Time of absolute load module 
generation 

Reserved for diagnostics 



t Deferred implementation 
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LOGICAL FILE TABLE - LFT 

The Logical File Table contains a 2-word entry for each dataset name and 
each alias for a dataset. Each entry points to the DSP for a dataset. 
Figure A-2 illustrates an LFT for a dataset. 

8 16 24 32 40 48 56 63 

DN I /////// 



1 



//////////////////////////////////////// I DSP 



Figure A-2. Logical File Table (LFT) entry 

Field Word Bits Description 

LFDN 0-55 Dataset name or alias 

LFDSP 1 40-63 DSP address 
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DATASET PARAMETER AREA - DSP 



Information concerning the status of a particular dataset and location of 
the I/O buffer for the dataset is maintained in the Dataset Parameter 
Area (DSP) of the user field. The DSP is illustrated in figure A-3. 



8 



16 



24 



32 



40 



48 



56 



63 



BSY 



STS 



spos- 
ueof" 



/////////I IPB I 



BIO' 



TPD 
] 
TPF 



18 
19 
20 
21 
22 
23 



ERR 



t. 



DN 



I /////// 



BFI I ///| flags 



IBN 



il/l RBC I OBP I 



OBN 



I ////////////// I 



TBN 



flags I 



PFI 



PR I 



FRST 



IN 



OUT 



LMT 



RCW 



LPW 



SPWA 



SPIN 



J BF | BUBCl 



BWC 



BWA 



BER 



TM 
reserved 
for use by 
TIO 




TPS 



TPB 



TPV 



U I ///////////////////////////////////////////I 



MTF 



RF l/Z/I^BDF 



MBS 



I 



RS 



BFBO 



CS 



1//IJU 



PCR 



BFBL 



BFBA 



LPBL I ////////////////////////////////// I 



BLBL 



Reserved for logical I/O 



EEC I ///////////////////////////////////////////////////// 



/////////// 1 flags | 



RECL 



NXRC 



Figure A-3. Dataset Parameter Area (DSP) 



Field 



DPDN 



Word 



Bits Description 
0-55 Dataset name 
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Field 
DPBSY 



Word 



Bits 



DPERR 



DPEOI 



1-12 



DPENX 


1 


2 


DPEOP 


1 


3 


DPEPD 


1 


4 


DPEBN 


1 


5 


DPEDE 


1 


6 


DPEHE 


1 


7 


DPERW 


1 


8 


DPEPT 


1 


9 


DPELE 


1 


10 




1 


11 


DPEEP 


1 


12 



DPSTS 



14-15 



Description 

Busy flag, circular I/O: 

Not busy 

1 Busy 

Error flags : 

End of data on read; write past 

allocated disk space on write. 

Dataset does not exist 

Dataset not open 

Invalid processing direction 

Block number error 

Unrecovered data error 

Unrecovered hardware error 

Attempted read after write or 

past EOD 

Dataset prematurely terminated 

Unrecovered logical data error 

Reserved 

Extended error (see DPEEC for error 

code) 

Status : 



DPBFI 



Flags: 
DPABD 
DPTP 
DPTRAN 

DPIA 

DPMEM 

DPRDM 



DPUDS 

DPEND 
DPFRST 



16-24 



29-3 9 
31 

32-33 
34 

35 
36 
37 



38 

39 
40-63 



00 Closed 

01 Open for output (O) 

10 Open for input (I) 

11 Open for I/O 

Blank compression character in ASCII 
(BFI=777s implies no compression) 

Accept Bad Data flag 

Tape dataset (online/staged) 

Transparent mode for interactive 

dataset 

Dataset is interactive 

Dataset is memory resident 

Random Dataset flag : 

Sequential dataset 

1 Random dataset 
Undefined dataset structure: 

COS blocked dataset structure 

1 Undefined dataset structure 
Write End-of-data flag 

Address of first word of buffer 
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Field 
DPIPB 

DPIBN 



Word 



DPIN 


2 


40-63 


DPSPOS 


3 





DPRBC 


3 


3-9 


DPOBP 


3 


10-15 



DPOBN 



DPOUT 


3 


40-63 


DPUEOF 


4 





DPTBN 


4 


16-39 



DPLMT 



Bits Description 

10-15 Bit position in current input word 
(character I/O only) 

16-39 Block number, read request. System 
reads from block number until buffer 
is filled. DPIBN is then set to the 
next block number. 

Address of current input word 

Asynchronous SETPOS Busy flag 

Remaining blank count 

Bit position in current output word 
(character I/O only) 

16-39 Block number, write request. System 
writes from block number until buffer 
is empty. The next block number is 
then in DPOBN. 

Address of current output word 

Uncleared end-of-file (EOF) 

Temporary block number; used by 
random I/O for last block read. 

40-63 Address of last word+1 of buffer. 

LMT minus FRST defines buffer size. 



Flags: 
DPEOR 
DPEOF 
DPEOD 
DPRW 



DPPFI 



DPPRI 



0-4 



2 

3 

4 



5-24 



25-39 



EOR flag 
EOF flag 
EOD flag 
Previous operation Read/write flag : 

Read 

1 Write 

Previous file index; backward index 
modulo 2 to block containing 
beginning of current file. 

Previous record index; backward index 
modulo 2 15 to block containing 
beginning of current record. 
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Field 



Word 



Bits 



Description 



DPRCW 



40-63 



DPLPW 



DPSPWA 



DPSPIN 



DPBIO 



DPBER 
DPBF 



DPBPD 



DPBEO 



DPBUBC 



7 
7 



0-63 



22-30 



31-63 



1 
2-9 



6-9 



10-15 



Control word address : 

Previous RCW address if in write 

mode 

Next RCW if in read mode 

Last partial word; used for character 
mode I/O. 

Word address save area used by 
Asynchronous SETPOS 

Word address save area used by 
Asynchronous SETPOS 

Buffered I/O busy : 

Buffered I/O operation 
complete 

1 Buffered I/O operation 
incomplete 

Buffered I/O Error flag 

Function code (buffered I/O only) : 

000 Read partial 

010 Read record 

040 Write partial 

050 Write record 

052 Write end-of-file 

056 Write end-of-data 

Processing direction (buffered I/O 
only) : 

Read 

1 Write 

Termination condition (buffered I/O 
only) : 

00 Partial 

10 Record 

12 File, write only 

16 Dataset, write only 

Unused bit count; must be specified 
on a write record request. Value 
returned on a read request. 
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Field 



Word 



Bits 



Description 



DPBWC 



16-39 



DPBWA 



40-63 



DPTM 


8-15 


0-63 




8 


0-63 




9 


0-63 




10 


16-39 




10 


40-63 




11 


16-39 




11 


40-63 




12 


0-7 




12 


8-15 




12 


16-39 




12 


40-63 




13 


16-39 




13 


40-63 




13 


0-63 




14 


0-15 




14 


16-39 




14 


40-63 




15 


0-63 


DPTPS 


16 


0-15 


DPTPB 


16 


16-39 


DPTPV 


16 


40-63 


DPTPD 


17 


0-1 


DPTPF 


17 


2-3 


DPMTF 


17 


48-63 


DPCT 


18 


0-3 



Word count (buffered I/O only) ; 
number of words at DPBWA to read or 
write. Field contains actual number 
of words read when request is 
completed . 

Word address of user data area 
(buffered I/O only) 

Used by TIO as follows: 
Saved word W@DPPRI 
Saved A2 in WB30 
$RWDP/$WWDP return address 
3RWDP/3WWDP first word address (FWA) 
WB30/$WEOF return address 
$WEOD return address 
JTA length/1000 8 when registers 
are saved 

Bits 0-7 of RBLK/WBLK A5 
Unused 
RBLK/WBLK B0 
DNT address 
(A7) JXT address 
RBLK/WBLK S5 during task recall 
Bits 8-23 of RBLK/WBLK A5 
RBLK/WBLK A2 
RBLK/WBLK A3 
RBLK/WBLK S6 

Online tape status 

Tape maximum block size in bytes 

Tape pointer to label definition table 

Tape density 

Tape format 

Maintenance test field (used by DQM) 

Conversion type; nonzero if run-time 
data and record format conversion 
selected. 



DPCTNONE=0 
DPCTIBM=1 



No conversion 
IBM format data 
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Field 
DPRF 



Word 



18 



Bits 



4-11 



DPMBS 


18 


16-39 


DPRS 


18 


40-63 


DPBFBO 


19 


0-5 


DPCS 


19 


6-11 



DPBDF 


19 


DPPCR 


19 


DPBFBL 


19 


DPBFBA 


19 


DPLPBL 


20 


DPBLBL 


20 


Reserved 


21 


DPEEC 


22 


Flags: 


23 


DPDEL 




DPBLNK 





14 

15 

16-39 

40-63 

0-5 

40-63 

0-63 

0-11 

12-15 
12 

13 



Description 

Record format (if DPCT nonzero) 

DPRFNONE=0 None 

DPRFIU=1 IBM undefined format 
DPRFIF=2 IBM fixed format 
DPRFIFB=3 IBM fixed blocked format 
DPRFIV=4 IBM variable format 
DPRFIVB=5 IBM variable blocked 

format 
DPRFIVBS=6 IBM variable block span 

format 

Maximum block size 

Record length 

User data area current bit offset 

Character set (if DPCT nonzero) : 
DPCSA=0 ASCII, 8 bits/character 
DPCSE=1 EBCDIC, 8 bits/character 

Bad Data flag 

Process characters remaining flag 

User data area current bit length 

User data area current address 

Last partial word bit length 

Current tape block bit length 

Reserved for logical I/O 

Error code if DPEEP is set; 
correspond to EXP abort codes. 



FORTRAN file status: 

Keep 

1 Delete 

FORTRAN numeric input blank 
conversion: 

Null 

1 Zero 
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Field 



Word 



Bits 



Flags : 




(continued) 




DPDIR 




DPUFMT 




DPRECL 


23 


DPNXRC 


23 



14 
15 

16-39 



40-63 



Description 



FORTRAN direct access flag 
FORTRAN unformatted I/O flag 

FORTRAN direct access record length 
(in number of characters) 

FORTRAN direct access next record 
number 
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PERMANENT DATASET DEFINITION TABLE - PDD 

The PDD is a parameter list that gives input to the Permanent Dataset 
Manager. The contents of PDD are illustrated in figure A-4. 





flags DTR SMT 

/ 8 \ ] 16 


24 


32 


40 48 56 63 





* ^Ifl^V/l 




1 SIZE 


1 ST | FC 


1 


TP TCS EXO 




DN 


1 //////// 


2 


PDN1 


3 






PDN2 


1 //////// 


4 


ID 


5 
6 




USR 


1 //////// 


7 


TXT 


1 


FM 


1 RT | ED 


8 






OJB 


1 //////// 


9 


SID I 


DID 


1 


DC | JSQ 


10 


TID 


UQ 11 


IR 

f 




SF 




12^ 


■[/| TXL 1 flags 1 


MFL 


1 


TL | PR 


13 


A 
ENT 




RD 




14 


WT 


15 


MN 


16 




JCN 




1 //////// 


17 


/ SYS 


CL 




1 //////// 


18 


\ JSP IJTPF JCR 


1 


OLM 


I RJST I IJSP 


19> 

TPL - 

20 

TPM— "' 
21 


^ \S\ ////// ITtpc 


TPB 




1 TPV 


,l ^ ^ s?idc//////////////////////////////////////////////////// 


TPP TP2 TPH 




RG1 




22 


RG9 


23 
TSCV_^ 


* \///////////////////////////////////////////////////////////// 


24 


////////I LSE 




I///I 


FPP | FEN 


25 


ACS | 


DSZ 




1 OJSQ 


26 


CRT 



Figure A-4. Permanent Dataset Definition Table (PDD) 
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16 



24 



32 



40 



48 



56 63 



ACT 



TDM 



MOD 



SSC I TXC 



MML 



I///////////////////////////////// 



I I //| PAM I ADNM 



ft 



I//////////////////////////////// 



REM N TRA 



ADN 



I//// 



NOTL 



NOTE 



I/////////////////////////////// 



CHG 



OWN1 



OWN 2 



I/////// 



DNS 



ACN1 



ACN2 



I/////// 



//////////////////////// Reserved ////////////////////////// 



Figure A-4. Permanent Dataset Definition Table (PDD) (continued) 



Field 



Word 



Flags: 





PMSG 




PMERR 




PMWAIT 




PMNRLS 




PMAQR 




PMTP 





PMTCS 





PMEXO 





PMDTR 





PMSMT 





PMSIZE 






Bits Description 
0-4 

Normal completion message suppression 
indicator 

1 Error message suppression indicator 

2 WAIT flag for a disposed dataset 

3 No release of dataset on DISPOSE 

4 Acquire flag for accounting 

5-6 Tape dataset (online) 

7-8 Tape dataset character set 

9-10 Execute only 

11 Update dump-time on PDSDUMP access 

12 Submit flag 
32-39 PDD size in words 
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Field 


Word 


Bits 


Description 


PMST 







40-51 


Return status; the codi 
in Appendix D. 


PMFC 







52-63 


Function code 


PMDN 


1 




0-55 


Local dataset name 


PMPDN 
PMPDNl 
PMPDN 2 


2- 

2 

3 


3 


0-63 
0-63 
0-55 


Permanent dataset name 
Characters 1-8 
Characters 9-15 



PMID 



PMUSR 


5-6 


0-63 


PMUSR1 


5 


0-63 


PMUSR 2 


6 


0-55 


PMTXT 


7 


0-23 


PMFM 


7 


24-39 



PMRT 


7 


40-51 


PMED 


7 


52-63 


PMOJB 


8 


0-55 


PMSID 


9 


0-15 


PMDID 


9 


16-31 


PMDC 


9 


32-47 



PMJSQ 
PMTID 



9 

10 



0-63 User identification 

User number 

Characters 1-8 
Characters 9-15 

Address of optional text field 

Format designator (2 characters): 

FMCD=CD Character/deblocked 

FMCB=CB Character/blocked 

FMBD=BD Binary/deblocked 

FMBB=BB Binary/blocked 

Retention period; 0-4095 days. 

Edition number (0-4095) 

Originating job name 

Source ID; 2 characters. 

Destination ID; 2 characters. 

Disposition code; 2 characters. 

DCIN=IN Job dataset 

DCST=ST Dataset to be staged 

DCSC=SC Scratch dataset 

DCPR=PR Print dataset 

DCPU=PU Punch dataset 

DCPT=PT Plot dataset 

DCMT=MT Magnetic tape dataset 

48-63 Job sequence number 

0-63 Terminal ID; 1-8 characters. 
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Field 



Word 



Bits 



PMSF 


11 


0-63 


PMUQ 


12 





PMENT 


12 


1 


PMIR 


12 


2 


PMTXL 


12 


3-10 


PMNRR 


12 


11 


PMINIT 


12 


12 


PMIA 


12 


13 


PMDFR 


12 


14 


PMNA 


12 


15 



PMMFL 



12 



16-31 



PMSGFL 




16 


PMFL 




17-31 


PMTL 


12 


32-55 


PMPR 


12 


56-63 


PMRD 


13 


0-63 


PMWT 


14 


0-63 


PMMN 


15 


0-63 


PMJCN 


16 


0-55 


PMCL 


17 


0-55 


PMSYS 


18 





PMJSP 


18 


1-8 


PMJCR 


18 


9-24 



Description 

Special forms 

Unique access required 

Enter in System Directory 

Immediate reply requested 

Number of words of text 

Job Rerun flag; set if job cannot be 
rerun (input entries only) . 

Job Initiate flag; set if job has 
been initiated. 

Interactive flag 

Deferred disposition indicator 

No Abort flag. If set, processing 
continues even if an error is 
encountered . 

Maximum field length/512 (input 
datasets only) 

Flag indicating system maximum field 
length requested 
Maximum field length/512 

Time limit (input datasets) 

Priority (input datasets) 

Read permission control word 

Write permission control word 

Maintenance permission control word 

Job class name 

CL parameter from JOB statement 

System job 

JOB statement priority 

Job class rank 
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Field 



Word 



Bits 



PMOLM 


18 


25-48 


PMRJST 


18 


49-55 


PMIJSP 


18 


56-63 


PMTPD 


19 


0-1 


PMTPL 


19 


2-4 


PMTPF 


19 


5-6 


PMTPC 


19 


15 


PMTPB 


19 


16-39 


PMTPV 


19 


40-63 


PMTPM 


20 





PMTPP 


20 


1-3 


PMTP2 


20 


4 


PMTPH 


20 


5 


PMIDC 


20 


6-8 


PMRG1 


21 


0-63 


PMRG9 


22 


0-63 


PMTSCV 


23 


0-1 



PMLSD 



PMFPE 



PMFPP 
PMFEN 



24 



24 

24 
24 



8-31 



36-63 

36-59 
60-63 



Description 

Size of $OUT in 512-word block 

Job Status flag 

Original job card priority 

Tape density 

Tape label type 

Tape format 

Tape cataloged dataset 

Tape maximum block size in bytes 

Tape pointer to Label Definition Table 

Tape online maintenance access 

Tape parallel device count 

Tape second device assignment 

Tape hold assigned device 

Tape initial desposition code 

First word of resource generic names 

Second word of resource generic names 

Timestamp conversion specification: 
TSCVTHIS (0) Convert to current COS 

system 
TSCVRT (1) Convert to timestamp 

based on clock periods 
TSCVNS (2) Convert to timestamp 

based on nanoseconds 
TSCVSAME (3) No conversion - leave 

timestamp alone 

Temporary SDT address (Load 
input/output) 

First DSC page/entry for dataset 

First DSC page for dataset 
First entry for dataset 
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Field 



Word 



Bits 



Description 



PMACS 



PMDSZ 



PMOJSQ 
PMCRT 

PMACT 

PMTDM 

PMMOD 



PMPAM 



25 



25 



25 
26 

27 

28 

29 



PMSSC 


30 


0-7 


PMTXC 


30 


8-15 


PMMML 


30 


16-27 


PMPDE 


31 





PMREM 


31 


1 


PMTRA 


31 


2-3 



31 



0-15 Number of accesses (load saved 
datasets only) 

16-47 Size of dataset as reflected by DSC 
DAT bodies (used only when a pseudo 
access is performed during the 
recovery of rolled jobs) 

48-63 Originating job sequence number 

0-63 Creation time in cycles (load request 
only) 

0-63 Time of last access in cycles (load 
request only) 

0-63 Time of last dump in cycles (load 
request only) 

0-63 Time of last modification in cycles 
(load request only) 

Station slot word length 

Text field word length 

Interactive maximum message length 

Partial delete option 

Remove permit option 

Access tracking option: 

TRAKNO = 1 Do not track accesses 
TRAKYE = 2 Do track accesses 

8-15 Public access mode : 

PAMEX = 11 8 Execute only 

limitation to read 
permission 
PAMRE = 1 Read permission 
PAMWR = 2 Write permission 
PAMMA = 4 Maintenance permission 
PAMNO = 200g No permissions 
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Field 



PMADNM 



PMADN 



Word 



31 



32 



Bits 



16-31 



0-55 



PMNOTL 


33 


0-7 


PMNOTE 


33 


8-31 


PMCHG 


34 


0-63 


PMOWN1 


35 


0-63 


PMOWN2 


36 


0-55 


PMDNS 


37 


0-63 


PMACN1 


38 


0-63 


PMACN2 


39 


0-55 



Description 

Attributes to be copied from PMADN: 



PACW = 1 
PAPAM = 2 
PATRK = 4 
PAPER = 10 8 
PATXT = 20 8 



PANTS =40 



8 



Reserved 



40-60 



0-63 



Control words 
Public access mode 
Track accesses 
Permits 
Text 
Notes 
PAALL = 77 8 All of the above 

PANO = lOOOOOg None are to be 
copied 

Local dataset name of a permanent 
dataset from which ADNM attributes 
are to be propagated from 

Notes length in words 

Base address of optional "notes" 
information 

Last modification time (load) 

Dataset owner (characters 1-8) 

Dataset owner (characters 9-15) 

Reserved for site use 

Account number (characters 1-8) (load) 

Account number (characters 9-15) 
(load) 

Reserved for CRI 
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BEGIN CODE EXECUTION TABLE - BGN 



The BGN Table specifies necessary parameters to begin execution of code 
loaded into the user area by the Control Statement Processor. Figure A- 5 
illustrates the BGN. 



PSF' 



8 



16 



24 



32 



40 



48 



56 



63 



J I ////////////// 1 



BP 



2^. 



PRGL 



I 



PRWC 



1 //////////////////////////////////////////////////////////////// 



* 



PAD 



ENT 



NRD 



Figure A-5. Begin Code Execution Table (BGN) 



Field 



Word 



Bits 



BGPSF 








BGPRGL 





16-39 


BGPRWC 





40-63 


BGBP 


2 





BGNRD 


2 


1 


BGPAD 


2 


2-33 


BGENT 


2 


40-63 



Description 
Preset Value flag 

Total program length including blank 
common 

Program word count 

Breakpoint flag 

No Reduce flag 

Requested memory pad 

Program entry point P-address 
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DATASET DEFINITION LIST - DDL 

A Dataset Definition List in the user field must accompany any create DNT 
(FSJDNT) request. The DDL is illustrated in figure A-6. 



1 
2 
3 
4 
5 



8 16 24 32 40 48 


56 63 


DN 


1 //////// 


LDV 


flags 1 BFI I///////////////////////I SZ 


///////////////I DNT I////////I 


BFZ (BSZ) 


///////////////////////////////////////////////I 


DC 


/////////////////////////////////////// 1 LM 



Figure A-6. Dataset Definition List (DDL) 



Field 


Word 



Bits 
0-55 


Description 


DDDN 


Dataset name 


DDLDV 


1 


0-63 


Logical device name 


Flags: 
DDRDM 


2 


0-6 



Random Dataset flag 



DDUDS 



DDNFE 



DDSTAT 

DDMR 
DDIA 
DDTRAN 



4 
5 
6 



Sequential 

1 Random 

Undefined dataset structure: 

COS blocked dataset structure 

1 Undefined structure 
Return error if dataset does not 
exist. Register SO returned nonzero 
if DNT does not exist; no DNT is 
created . 

Request dataset statistics; ignored 
unless DDNFE=1 (see DDDNT) . 
Dataset is to be memory resident. 
Interactive type dataset 
Transparent mode for interactive 
dataset 
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Field 
DDBFI 



Word 



Bits 



7-15 



Description 

Blank field indicator for character 
I/O: 



DDBFI 



Blank field initiator 









000g 


IGBFI 








< 4O0 8 


User-specified ASCII 
character 








400 8 
> 400 8 


000 

Blank compression 

disabled 


DDSZ 


2 


40-63 


Dataset size in 512-word blocks 


DDDNT 


3 


16-39 


Address of 
F3DNT when 


DNT image returned by 
DDNFE=1 and DDSTAT=1 


DDBFZ 


3 


49-63 


Buffer size in 512-word blocks 


DDBSZ 


3 


4 9-63 


Alternate i 


name for DDBFZ to match 



DDDC 



DDLM 



3SYSTXT name 

48-63 Disposition code (2 characters) : 

DCIN=IN Job dataset 

DCST=ST Staged permanent dataset 

DCSC=SC Scratch dataset 

DCPR=PR Print dataset 

DCPT=PT Plot dataset 

DCPU=PU Punch dataset 

DCMT=MT Magnetic tape dataset 

40-63 Dataset size limit in 512-word blocks 
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OPEN DATASET NAME TABLE - ODN 

A 2-word Open Dataset Name Table (ODN) is generated in the user field the 
first time an OPEN of the specified dataset is encountered. Figure A-7 
illustrates the ODN. 







8 



16 



24 



32 



40 



48 



56 



63 





1 



DN 



I //////// 



/////////////////////////////////////////I 



DSP 



Figure A-7. Open Dataset Name Table (ODN) 



Field 



Word 



ODDN 
ODDSP 1 



Bits Description 
0-55 Dataset name 

40-63 DSP pointer: 

Negative Negative offset from 

beginning of DSPs 
Positive Offset from user base 
address 
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OPTION TABLE - OPT 

The Option Table (OPT) is used for F$OPT calls. Figure A-8 illustrates 
the OPT. 



8 



16 



24 



32 



40 



48 



56 63 



OPLPP 



i Li////////////////////////////////////////////////////////////// 



OPSTAT 



Figure A-8. Option Table (OPT) 



Field 
OPLPP 
OPSTAT 



Word 


1 



Bits Description 
0-63 Page length 
Dataset statistics enabled 
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JCL BLOCK INFORMATION TABLE - JBI 

The 1-word JCL Block Information Table (JBI) is generated in the user 
field and has two formats: one for conditional information (see figure 
A-9) and the other for interative information (see figure A-10) . 

Conditional block information: 



EXC- 



8 16 


24 


32 


40 


48 


56 


63 


"I/////////////I 


LLEV 


1 


PLEV 


1 


LEVL 





Figure A-9. JCL conditional block information 



Field 



Bits 



JBEXC 





JBLLEV 


16-31 


JBPLEV 


32-47 


JBLEVL 


48-63 



Description 

Conditional sequence is in execution 

Iterative nesting level where conditional begins 

Procedure nesting level where conditional begins 

Current conditional nesting level 



Iterative block information: 
8 16 



24 



32 



40 



48 



///////I 



CNT 



PLEV 



Figure A-10. JCL iterative block information 



56 



63 



LEVL 



Field 



Bits 



JBCNT 


8-31 


JBPLEV 


32-47 


JBLEVL 


48-63 



Description 
Iteration count 

Procedure nesting level where iterative block 
begins 

Current iterative nesting level 
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JCL SYMBOL TABLE - JST 

The 4-word JCL Symbol Table (JST) is generated in the job table area and 
contains information about system and user symbols. See figure A-ll. 



CRE 


1 

2 

3 







N^ 



8 



16 



24 



32 



40 



48 



56 



63 



I////////////////////////////////////////////////////////////// 



SN 



flags I /////// 1 TYPE | ////////////////// 1 



LEVL 



/////////////////I 



LEN 



I /////I 



VAL 



Figure A-ll. JCL Symbol Table (JST) 



Field 



JSCRE 



Word 



Bits 



JSSN 


1 


Flags: 


2 


JSLOC 




JSCON 




JSSRS 




JSUSR 




JSSYS 





JSTYPE 



0-63 
0-4 


1 
2 
3 
4 

10-15 



JSLEVL 


2 


40-63 


JSLEN 


3 


12-35 


JSVAL 


3 


40-63 



Description 

Create if not found. Available only 
for system use. 

Symbol name 



Local or global. If set, symbol is 

procedure local . 

Constant or variable. If set, symbol 

is constant. 

System reserved. If set, the symbol 

name is reserved by the system. 

User settable. If set, symbol can be 

modified by the job. 

System settable. If set, the symbol 

can be modified by COS. 

One of the following symbol types: 

SYMTUDF 00 Undefined - no type 
SYMTBOO 01 Boolean - logical 
SYMTINT 02 Decimal integer 
SYMTLIT 03 ASCII literal; 1-8 
characters. 

Procedure definition level 

Length of value 

Base address of value buffer 
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LABEL DEFINITION TABLE - LPT 

The Label Definition Table describes the tape label. It consists of four 
parts: the LDT header, volume header, header 1 entry, and header 2 
entry. Except for the LDT header, which points to the other entries, 
these entries are optional and can appear anywhere after the header. The 
following conditions must be met for constructing a Label Definition 
Table (LDT) : 

• The header must be present. 

• The header must precede the first entry. 

• Each entry must be pointed to by the offset value in the LDT 
header. Zero is used for absent fields. 

• The lengths of the whole LDT and of each entry must be set in the 
proper fields. 

• The length value for volume 1 must be at least large enough to 
include the first VSN. The length value for either header 1 or 
header 2 must be at least the defined length of the respective 
entry. 



LDT HEADER 

The LDT header, required on all LDTs, serves the following functions: 

• Specifies the beginning and end of the LDT 

• Specifies the location of each LDT entry with respect to the LDT 
base 

• Identifies non-standard aspects of a dataset 

• Points to labels within a label group 
The LDT header is illustrated in figure A-12. 



8 16 24 32 40 48 56 63 





1 



TN I /////////////////////// I TL_ 

CT |LT K/PROT/////////////////////////I DNT 



2 |/////////////// I V1B 1 H1B 

3 



///////////////I H2B I //////////////////////// 



Figure A-12. Label Definition Table (LDT) header 



SR-0011 A-28 



Field 



Word 



LDTN 





0-23 


LDTL 





48-63 


LDCT 


1 


0-3 



LDLT 



LDPROT 



LDDNT 



LDV1B 



LDH1B 



LDH2B 



4-7 



Bits Description 

Table name ("LDT" in ASCII) 

Table length (variable) 

Numeric conversion type: 
DPCTNONE (0) No conversion 
DPCTIBM (1) 32-bit conversion 

Requested label type: 
TPLNL (0) Non-labeled 
TPLAL (1) ANSI standard labels 
TPLSL (2) IBM standard labels 

8 Protected access indicator. If 

nonzero for a NEW tape dataset, then 
the dataset is to be protected on the 
servicing front end. 

40-63 Dataset Name Table (DNT) pointer. The 
field value is relative to the 
beginning of the job's JTA. 

16-39 Offset of volume 1 entry, relative to 
LDT base. If the LDT does not contain 
a VOL1 entry, this field must be 0. 

40-63 Offset of header 1 entry, relative to 
LDT base; must be if there is no 
HDR1 entry 

16-39 Offset of header 2 entry, relative to 
LDT base; must be if there is no 
HDR2 entry 



VOLUME 1 ENTRY 

The volume 1 entry (see figure A-13) corresponds to volume 1 labels for 
all volumes in the dataset. The volume 1 entry may be placed anywhere 
after the header, so long as the LDV1B header field points to it 
properly. The volume 1 entry is optional. 
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1 

2 
3 
4 

5-n 






8 


16 


24 


32 40 


48 56 63 






VOL1 




I////////I 


VSB 


1 VL1L 




VSNL 


1 


CVN 


1 DT | 




FVN 


0ID1 










OID2 




1 //////////////// 


GDN 








VSN 




VRGJ^I/I VDCl VAC 



Figure A-13. Label Definition Table (LDT) volume 1 entry 



Field 


Word 



Bits 


LDVOL1 


0-31 


LDVSB 





40-47 


LDVL1L 





48-63 


LDVSNL 


1 


0-15 


LDCVN 


1 


16-31 


LDDT 


1 


32-39 


1 


LDOID 
LDOIDl 
LDOID2 


2-3 

2 

3 


0-63 
0-63 
0-47 


LDGDN 


4 


0-63 


LDVSN 


5-n 


0-47 


LDVRG 


5-n 


48 



LDVDC 



LDVAC 



5-n 



5-n 



51-55 



56-63 



Description 

Entry name ("VOLl" in ASCII) 

Volume serial base offset 

Volume 1 length 

Number of VSNs in entry 

Current VSN ordinal 

Device type : 
TPD62 = 6250 bpi 
TPD16 = 1600 bpi 

Owner identifier: 
Characters 1-8 
Characters 9-14 

Generic device name 

Beginning VSN 

Volume-registered flag, set by a 
servicing front end. One indicates 
that the front end supplied the VSN 
from its catalog . 

Volume disposition: 

TPOLD = Existing dataset 

1 TPNEW = New volume to dataset 

Volume accessibility character, 
obtained from the label group 
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HEADER 1 ENTRY 

The header 1 entry (see figure A-14) describes dataset attributes and 
corresponds to the HDR1, E0F1, and E0V1 labels for all volumes in the 
dataset. Header 1 shows numeric fields in both binary and ASCII 
characters. COS uses the ASCII equivalents for generating and validating 
the label group. If a field is changed, both versions must be changed. 
ASCII fields are right-justified with leading zeros. The header 1 entry 
is optional and can be placed anywhere after the header, so long as it is 
pointed to by header field LDH1B. 




1 
2 
3 
4 
5 
6 
7 
10 8 

^8 
12 8 

13 8 
14 8 
15s 
16 8 

"8 

20 8 



8 16 


24 


32 40 48 


56 63 


HDR1 




I///////////////I 


HR1L 


FID1 


FID2 


FID3 


FID4 


FID5 


FID6 




1 CVSQ I 


FVSQ 


FSEC 




1 CSEC 




FSEQ 




1 DAC I VN I 


FSQ 


GEN 




1 GN | 


GVN 




CDT 


1 //////////////// 




XDT 


UXD v-P* 1 


RT 




BLK 


1 //////////////// 




SET 


1 //////////////// 


/////////////////////////////// 1 VBC 


SC0D1 


SC0D2 



Figure A-14. Label Definition Table (LDT) header 1 entry 



Field 

LDHDR1 

LDHR1L 




Bits Description 

0-31 Entry name ("HDR1" in ASCII) 

48-63 Header 1 length 
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Field 



LDFID 



Word 



1-6 



Bits 



0-63 



Description 

File identifier (dataset name) 



LDFID1 


1 


0-63 


Characters 1-8 


LDFID2 


2 


0-63 


Characters 9-16 


LDFID 3 


3 


0-63 


Characters 17-24 


LDFID4 


4 


0-63 


Characters 25-32 


LDFID 5 


5 


0-63 


Characters 33-40 


LDFID6 


6 


0-31 


Characters 41-44 



LDCVSQ 



LDFVSQ 



LDFSEC 



LDCSEC 



LDFSEQ 



LDDAC 



LDVN 



LDFSQ 



LDGEN 



LDGN 



10 8 



10, 



10 8 



10 f 



118 



Us 



32-47 Current volume sequence number (file 
section number) , binary equivalent 
of LDCSEC 

48-63 First volume sequence number (file 
section number) , binary equivalent 
of LDFSEC 

0-31 First file section number (volume 
sequence number) in ASCII, the 
ordinal number of the volume to be 
mounted first 

32-63 Current file section number (volume 
sequence number) in ASCII, the 
ordinal number of the currently 
mounted volume 

0-31 File sequence number (ASCII) ordinal 
of the dataset being accessed. If 
FSEQ > 1, volume should have more 
than one dataset. 

32-39 Dataset accessibility character. 1: 
the dataset is protected more than 
the default protection. 

40-47 Generation version number, numeric 
equivalent of LDGVN 

48-63 File sequence number, numeric 
equivalent of LDFSEQ 

0-31 Generation number. Any value other 
than one indicates that a dataset is 
in a generation data group. 

32-47 Generation number, numeric 
equivalent of LDGEN 
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Field 
LDGVN 



Word 



llf 



LDCDT 



LDCSP 
LDCYR 
LDCDY 

LDXDT 

LDXSP 
LDXYR 
LDXDY 

LDUXD 



LDRT 
LDBLK 



12< 



13c 



13 £ 
13 8 
13c 



13c 



13j 



14c 



Bits Description 

48-63 Generation version number (ASCII) . 
Any value other than indicates 
that the dataset is in a generation 
data group. 

0-47 Creation date (ASCII) . This field 
indicates the creation date of the 
dataset in the Julian form: 
yyddd . Note the space must be 
present. 

0-7 Space 

8-23 Year 

24-47 Day 

0-47 Expiration date; same format as 

creation date above 
0-7 Space 
8-23 Year 
24-47 Day 

48 User specified XDT (expiration date) 
flag 

49-63 Retention period, integer days 

0-47 Volume block count (ASCII) : number 
of user data blocks present, read 
from or written into the label. Can 
be inaccurate because overflow 
causes it to be cleared; see LDVBC 
for an accurate count. 



LDSET 



15< 



0-47 File set identifier, normally set to 
the serial number of first volume in 
the dataset 



LDVBC 



16 8 



32-63 Volume block count (binary) , number 
of blocks written on volume so far 



LDSCOD 



17 8 -20 8 



LDSCOD1 17 
LDSCOD2 20 



0-63 
0-39 



System identification code, to 
identify the operating system or 
computer system that generated the 
tape 

Characters 1-8 

Characters 9-13 
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HEADER 2 ENTRY 

The header 2 entry (see figure A-15) describes dataset attributes and 
corresponds to the HDR2, EOF 2, and E0V2 labels for all volumes in the 
dataset. Header 2 shows numeric fields in both binary and ASCII 
characters. COS uses the ASCII equivalents for generating and 
validating the label group. If a field is changed, both versions must 
be changed. ASCII fields are right-justified with leading zeros. The 
header 2 entry is optional and can be placed anywhere after the header, 
as it is pointed to by header field LDH2B. 




1 
2 
3 

4 



8 


16 24 32 


40 


48 56 63 




HDR2 | 




HR2L 


FMT | BA 


I///////////////I 




MBS 


BFO 


I///////////////I 




MRS 




BL 


1 //////////////////////// 




RL 


1 //////////////////////// 



Figure A-15. Label Definition Table (LDT) header 2 entry 



Field 
LDHDR2 
LDHR2L 
LDFMT 



Word 




1 



Bits Description 

0-31 Entry name ("HDR2" in ASCII) 

48-63 Header 2 length 

0-7 Record format. 

IBM label types: 

F Fixed-length records 
V Variable-length records 
U Undefined record format 
ANSI label types: 

F Fixed-length records 
Variable-length records 
Records span tape blocks 



D 
S 



LDBA 



8-15 



Block attributes, IBM label types 
only: 

B Blocks are an integral 

multiple of the record size. 
S Records span tape blocks. 
R Records span tape blocks, and 
the blocks are an integral 
multiple of the record size. 
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Field 
LDMBS 

LDBFO 
LDMRS 

LDBL 



Word 



Bits Description 

32-63 Maximum block size (binary) , maximum 
size of any tape block that can be 
read or written 

0-15 Buffer offset, ANSI only (not 

supported by the operating system) 

32-63 Maximum record size (binary) , 

maximum size of any record that can 
be read or written 

0-39 Maximum block size (ASCII) , maximum 
number of bytes in a tape block, 
read from or written into the 
label. Can be inaccurate because 
overflow causes it to be cleared; 
see LDMBS for an accurate count. 
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CHARACTER SET B 



The ASCII character set contains 128 control and graphic characters shown 
in the following table. Numbers, letters, and special characters that 
form the Cray FORTRAN character set are identified by the appearance of 
the letter C in the fourth column. All other characters are members of 
the auxiliary character set. The letter A in the fourth column of the 
table indicates those characters belonging to the ANSI FORTRAN character 
set. 

The letters that appear in parentheses following the descriptions in the 
fifth column indicate the following control character usage. 

• CC - Communication control 

• FE - Format effector 

• IS - Information separator 
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ASCII 


ASCII 


FORTRAN 




CHARACTER 


OCTAL 


PUNCHED-CARD 


(A=ANSI) 


DESCRIPTION 




CODE 


CODE 


(C=CRAY) 




NUL 


000 


12-0-9-8-1 




Null 


SOH 


001 


12-9-1 




Start of heading (CC) 


STX 


002 


12-9-2 




Start of text (CC) 


ETX 


003 


12-9-3 




End of text (CC) 


EOT 


004 


9-7 




End of transmission (CC) 


ENQ 


005 


0-9-8-5 




Enquiry (CC) 


ACK 


006 


0-9-8-6 




Acknowledge (CC) 


BEL 


007 


0-9-8-7 




Bell (audible or attention 
signal) 


BS 


010 


11-9-6 




Backspace (FE) 


HT 


011 


12-9-5 




Horizontal tabulation (FE) 


LF 


012 


0-9-5 




Line feed (FE) 


VT 


013 


12-9-8-3 




Vertical tabulation (FE) 


FF 


014 


12-9-8-4 




Form feed (FE) 


CR 


015 


12-9-8-5 




Carriage return (FE) 


SO 


016 


12-9-8-6 




Shift out 


SI 


017 


12-9-8-7 




Shift in 


DLE 


020 


12-11-9-8-1 




Data link escape (CC) 


DC1 


021 


11-9-1 




Device control 1 


DC 2 


022 


11-9-2 




Device control 2 


DC3 


023 


11-9-3 




Device control 3 


DC4 


024 


9-8-4 




Device control 4 (stop) 


NAK 


025 


9-8-5 




Negative acknowledge (CC) 


SYN 


026 


9-2 




Synchronous idle (CC) 


ETB 


027 


0-9-6 




End of transmission block (CC) 


CAN 


030 


11-9-8 




Cancel 


EM 


031 


11-9-8-1 




End of medium 


SUB 


032 


9-8-7 




Substitute 


ESC 


033 


0-9-7 




Escape 


FS 


034 


11-9-8-4 




File separator (IS) 


SR-0011 






B-2 


T. 





ASCII 


ASCII 


FORTRAN 




CHARACTER 


OCTAL 


PUNCHED-CARD 


(A=ANSI) 


DESCRIPTION 




CODE 


CODE 


(C=CRAY) 




GS 


035 


11-9-8-5 




Group separator (IS) 


RS 


036 


11-9-8-6 




Record separator (IS) 


US 


037 


11-9-8-7 




Unit separator (IS) 


(Space) 


040 


(None) 


A,C 


Space (blank) 


i 


041 


12-8-7 




Exclamation mark 


n 


042 


8-7 


C 


Quotation marks (diaeresis) 


# 


043 


8-3 




Number sign 


$ 


044 


11-8-3 


A,C 


Dollar sign (currency symbol) 


% 


045 


0-8-4 




Percent 


& 


046 


12 




Ampersand 


I 


047 


8-5 


A,C 


Apostrophe (single close 
quotation) 


( 


050 


12-8-5 


A f C 


Opening (left) parenthesis 


) 


051 


11-8-5 


A,C 


Closing (right) parenthesis 


* 


052 


11-8-4 


A,C 


Asterisk 


+ 


053 


12-8-6 


A,C 


Plus 


t 


054 


0-8-3 


A,C 


Comma (cedilla) 


- 


055 


11 


A,C 


Minus (hyphen) 


m 


056 


12-8-3 


A,C 


Period (decimal point) 


/ 


057 


0-1 


A,C 


Slant (slash, virgule) 





060 





A,C 


Zero 


1 


061 


1 


A,C 


One 


2 


062 


2 


A,C 


Two 


3 


063 


3 


A,C 


Three 


4 


064 


4 


A,C 


Four 


5 


065 


5 


A,C 


Five 


6 


066 


6 


A,C 


Six 


7 


067 


7 


A,C 


Seven 


8 


070 


8 


A,C 


Eight 
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ASCII 


ASCII 


FORTRAN 




CHARACTER 


OCTAL 


PUNCHED-CARD 


(A=ANSI) 


DESCRIPTION 




CODE 


CODE 


(C=CRAY) 




9 


071 


9 


A,C 


Nine 


: 


072 


8-2 


A,C 


Colon 


i 


073 


11-8-6 




Semicolon 


< 


074 


12-8-4 




Less than 


= 


075 


8-6 


A,C 


Equal 


> 


076 


0-8-6 




Greater than 


? 


077 


0-8-7 




Question mark 


@ 


100 


8-4 




Commercial at-sign 


A 


101 


12-1 


A,C 


Uppercase letter 


B 


102 


12-2 


A,C 


Uppercase letter 


C 


103 


12-3 


A,C 


Uppercase letter 


D 


104 


12-4 


A,C 


Uppercase letter 


E 


105 


12-5 


A,C 


Uppercase letter 


F 


106 


12-6 


A,C 


Uppercase letter 


G 


107 


12-7 


A,C 


Uppercase letter 


H 


110 


12-8 


A,C 


Uppercase letter 


I 


111 


12-9 


A,C 


Uppercase letter 


J 


112 


11-1 


A,C 


Uppercase letter 


K 


113 


11-2 


A,C 


Uppercase letter 


L 


114 


11-3 


A,C 


Uppercase letter 


M 


115 


11-4 


A f C 


Uppercase letter 


N 


116 


11-5 


A,C 


Uppercase letter 





117 


11-6 


A,C 


Uppercase letter 


P 


120 


11-7 


A,C 


Uppercase letter 


Q 


121 


11-8 


A,C 


Uppercase letter 


R 


122 


11-9 


A,C 


Uppercase letter 


S 


123 


0-2 


A,C 


Uppercase letter 


T 


124 


0-3 


A,C 


Uppercase letter 


U 


125 


0-4 


A,C 


Uppercase letter 
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ASCII 


ASCII 


FORTRAN 






CHARACTER 


OCTAL 


PUNCHED-CARD 


(A=ANSI) 


DESCRIPTION 






CODE 


CODE 


(C=CRAY) 






V 


126 


0-5 


A,C 


Uppercase letter 




W 


127 


0-6 


A,C 


Uppercase letter 




X 


130 


0-7 


A,C 


Uppercase letter 




Y 


131 


0-8 


A,C 


Uppercase letter 




Z 


132 


0-9 


A,C 


Uppercase letter 




[ 


133 


12-8-2 




Opening (left) bracket 




/ 


134 


0-8-2 




Reverse slant (backslash) 




] 


135 


11-8-2 




Closing (right) bracket 




A 


136 


11-8-7 




Circumflex 




- 


137 


0-8-5 




Underline 




I 


140 


8-1 




Grave accent (single open 
quotation) 




a 


141 


12-0-1 


C 


Lowercase letter 




b 


142 


12-0-2 


C 


Lowercase letter 




c 


143 


12-0-3 


c 


Lowercase letter 




d 


144 


12-0-4 


c 


Lowercase letter 




e 


145 


12-0-5 


c 


Lowercase letter 




f 


146 


12-0-6 


c 


Lowercase letter 




g 


147 


12-0-7 


c 


Lowercase letter 




h 


150 


12-0-8 


c 


Lowercase letter 




i 


151 


12-0-9 


c 


Lowercase letter 




3 


152 


12-11-1 


c 


Lowercase letter 




k 


153 


12-11-2 


c 


Lowercase letter 




1 


154 


12-11-3 


c 


Lowercase letter 




m 


155 


12-11-4 


c 


Lowercase letter 




n 


156 


12-11-5 


c 


Lowercase letter 




o 


157 


12-11-6 


c 


Lowercase letter 




P 


160 


12-11-7 


c 


Lowercase letter 




q 


161 


12-11-8 


c 


Lowercase letter 




r 


162 


12-11-9 


c 


Lowercase letter 
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ASCII 


ASCII 


FORTRAN 




CHARACTER 


OCTAL 


PUNCHED-CARD 


(A=ANSI) 


DESCRIPTION 




CODE 


CODE 


(C=CRAY) 




S 


163 


11-0-2 


C 


Lowercase letter 


t 


164 


11-0-3 


c 


Lowercase letter 


u 


165 


11-0-4 


c 


Lowercase letter 


V 


166 


11-0-5 


c 


Lowercase letter 


w 


167 


11-0-6 


c 


Lowercase letter 


X 


170 


11-0-7 


c 


Lowercase letter 


Y 


171 


11-0-8 


c 


Lowercase letter 


z 


172 


11-0-9 


c 


Lowercase letter 


{ 


173 


12-0 




Opening (left) brace 


1 


174 


12-11 




Vertical line 


1 


175 


11-0 




Closing (right) brace 


«\i 


176 


11-0-1 




Overline (tilde, general 
accent) 


DEL 


177 


12-9-7 




Delete 
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EXCHANGE PACKAGE 



An Exchange Package is a 16-word block of data in memory that is 
associated with a particular computer program. An Exchange Package 
contains the basic hardware parameters necessary to provide continuity 
from one execution interval for the program to the next. The CRAY-1 
Exchange Package is illustrated in figure C-l; the CRAY X-MP Exchange 
Package is illustrated in figure C-2. 




1 
2 
3 
4-7 
8-15 



8 16 


24 


32 40 


48 


56 


63 


El S |R| BI///I 


P 


1 




A0 




c I///I 


BA 


l//l<_y IMM 




Al 




//////////// IRHI ///I 


LA 


1 M | 




A2 




///////////////I XA 


1 VL | 


F I 




A3 




///////////////////////////////////////I 


A4 


to A7 






SO to 


S7 









Figure C-l. CRAY-1 Exchange Package 



Field 

Error type (E) 

Syndrome bits (S) 

Read mode (R) 

Bank error address (B) 

Program register (P) 

Chip error address (C) 

Base address (BA) 

Interrupt Monitor Mode bit 

High-order bits of memory error 

address (RH) 
Limit address (LA) 
Mode bits (M) 
Exchange address (XA) 
Vector length (VL) 
Flag register (F) 
Current contents of the eight 
Current contents of the eight 



Word 



Bits 










0-1 









2-9 









10-11 









12-15 









18-39 




1 




0-15 




1 




18-35 


1M) 


1 




39 


>r read 










2 




14-15 




2 




18-35 




2 




36-39 




3 




16-23 




3 




24-30 




3 




31-39 


A registers 


0- 


7 


40-63 


S registers 


8- 


15 


0-63 
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PN — v 


1 

2 

3 

4 

5 
6-7 
8-15 



8 16 


24 


32 40 


48 


56 63 


*E\ S I///I 


P 


1 




A0 


R| CS | B I/////I 


IBA 


IML1 | 




Al 


J/VNU///////////I 


ILA 


|ML2 I 




A2 


///////////// IFI XA 


I VL 


1 F I 




A3 


/////////////////I 


DBA 


PsIVl^f CLN 




A4 


/////////////////I 


DLA 


I////I 




A5 


///////////////////////////////////////I 


A6 


to A7 




SO 


to S7 







Figure C-2. CRAY X-MP Exchange Package 



Field 

Processor number (PN) 

Error type (E) 

Syndrome bits (S) 

Program Address register (P) 

Read mode (R) 

Read address (CSB) 

Instruction Base Address (IBA) 

Instruction Limit Address (ILA) 

Mode register (M) 

Vector not used (VNU) 

Flag register (F) 

Exchange Address register (XA) 

Vector Length register (VL) 

Data Base Address (DBA) 

Program State (PS) 

Cluster Number (CLN) 

Data Limit Address (DLA) 

Current contents of the eight 

Current contents of the eight 



Word 



Bits 










1 









2-3 









4-11 









16-39 




1 




0-1 




1 




2-6 (CS) ; 7-: 




1 




18-34 


) 


2 




18-34 




1- 


2 


35-39 




2 









3 




14-15; 31-39 




3 




16-23 




3 




24-30 




4 




18-34 




4 




35 




4 




38-3 9 




5 




18-34 


A registers 


0- 


7 


40-63 


S registers 


8- 


-15 


0-63 



(B) 
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ERROR AND STATUS CODES 



SYSTEM ERROR CODES 

Table D-l describes the system error codes as released. Installation 
differences can change data in this table. Consult the on-site analyst 
for details. The CRAY-OS Message Manual, publication SR-0039, also 
contains additional descriptions of the abort codes and their 
corresponding messages. 



Table D-l. Error codes for reprieve processing 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non-fatal 


Mask Value) 


Description 


AB001 


NF 


4 


End-of-file on read 


ABO 02 


NF 


4 


Invalid LOCK or UNLOCK indicator 


AB003 


F 


4 


Device Allocation Table exhausted 


AB004 


NF 


4 


Dataset not open 


AB005 


NF 


4 


Invalid dataset open request 


AB006 


NF 


4 


No read permission 


AB007 


NF 


4 


No write permission 


AB008 


NF 


4 


Illegal bit set in RFL request word 


AB009 


NF 


4 


Attempt to delete memory outside 
program area 


AB010 


F 


400 


No available disk space 


AB011 


F 


4000 


System directory is full 


AB012 


NF 


4 


Job Table Area (JTA) overflow 


AB013 


NF 


4 


More memory requested than 
available 


AB014 


NF 


4 


More memory requested than allowed 


AB015 


NF 


2000 


Unknown acquire error 


AB016 


NF 


2000 


Subdataset SIN cannot be disposed 
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Table D-l. Error codes for reprieve processing (continued) 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non-fatal 


Mask Value) 


Description 


AB017 


NF 


4 


Invalid dataset close request 


AB018 


NF 


4 


Dataset already opened 


AB019 


NOT REPRIEVABLE 


Job Communication Block destroyed 


AB020 


NF 


4 


Invalid system request parameter 


AB021 


NF 


4 


Dataset not found 


AB022 


NF 


4 


Invalid program load dataset 


AB023 


F 


200 


Job time limit exceeded 


AB024 


F 


10 


Operator dropped user job 


AB025 


NF 


2 


User program requested abort 


AB026 


NF 


4 


Invalid (undefined) user request 


AB027 


NF 


4 


Call not between user BA and LA 


ABO 2 8 


NF 




XP errors (no message) 


AB029 


NF 


4 


Logical device name not found 


ABO 30 


NF 


4 


Block number error 


AB031 


NF 


4 


Unrecoverable data error 


AB032 


NF 


4 


Unrecoverable hardware error 


AB033 


NF 


4 


Read after write or after EOD 


AB034 


NF 


4 


Unknown error 


AB035 


NF 


4 


Invalid processing direction 


AB036 


NF 


4 


Dataset prematurely terminated 


AB037 


NF 


4 


Dataset Parameter Table invalid 


AB038 


NOT RE 


PRIEVABLE 


Operator killed user job 


AB039 


NF 


20 


Operator reran the job 


AB040 


NF 


4 


Invalid disposition code 


AB041 


F 


4000 


Enter allowed on access only 



t The AB028 error code is set during abort processing when any Exchange 
Package error flag is set. It does not represent a single reprievable 
condition. One of the Exchange Package error codes (AB053 through 
AB058) will be set later to indicate the appropriate error. 
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Table D-l. Error codes for reprieve processing (continued) 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non-fatal 


Mask Value) 


Description 


AB043 


F 


400 


Allowable user log size exceeded 


AB044 


NF 


4 


invalid dataset name 


AB045 


NF 


400 


Specified LM is too big 


AB046 


NF 


400 


Dataset size limit exceeded 


AB047 


NF 


2000 


Dataset not available from station 


AB048 


NF 


2000 


Dataset cannot be saved on a front 
end 


AB049 


NF 


4 


Invalid LFTs in user area 


AB051 


F 


4 


Invalid pointer to first JTA LFT 


AB052 


NF 


4 


No user LFT DN matches JTA LFT 


AB053 


NF 


100 


Floating-point error 


AB054 


NF 


4 


Operand range error 


AB055 


NF 


4 


Program range error 


AB056 


NF 


40 


Uncorrected memory error 


AB057 


NOT REPRIEVABLE 


Interactive ABORT 


AB058 


F 


4 


Error exit 


AB061 


NF 


4 


No invoke request provided 


AB062 


NF 


4 


Invoke request abort pending 


AB063 


NF 


4 


Invoke length not multiple of 512 


AB064 


NF 


4 


Invoke length greater than maximum 


AB066 


NF 


4 


Dataset has related disposes active 


AB067 


NF 


4 


Invalid procedure dataset 


AB068 


NF 


4 


Procedure nest level exceeded 


AB070 


NF 


10000 


ATTENTION request command was 
entered at an interactive terminal 


AB071 


NF 


4 


Bad class structure 


AB072 


NF 


4 


DSP destroyed by user 


AB073 


NF 


4 


Undefined function code in F$INS 
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Table D-l. Error codes for reprieve processing (continued) 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non-fatal 


Mask Value) 


Description 


AB074 


NF 


4000 


DUMPJOB processing has been 
inhibited 


AB075 


NF 


4000 


No permissions granted while 
dataset is execute-only 


AB076 


NF 


4 


Dataset is already accessed by the 
job 


AB077 


NOT REPRIEVABLE 


CSP internal error 


AB078 


NF 


4000 


Privileged system request 


AB079 


NF 


4 


Unassigned JCL symbol 


AB080 


NF 


4 


Receive buffer too small 


AB081 


NF 


4 


Undefined JCL symbol 


AB082 


NF 


4 


JCL symbol cannot be modified 


AB083 


NF 


4 


Invalid message class 


AB100 


NF 


4 


Nonsequential write for tape 
dataset 


AB101 


NF 


4 


Interchange and unblocked are 
mutually exclusive 


AB102 


NF 


4 


Tape dataset can not be disposed 


AB103 


NF 


4 


VOL parameter must be equated for 
OLD dataset 


AB104 


NF 


4 


Job has requested more devices 
than it has allocated 


AB105 


NF 


4 


The Label Definition Table has 
been omitted for a labeled tape 
dataset 


AB106 


NF 


4 


The LDT has a bad field 


AB107 


NF 


4 


Unable to write trailer label group 


AB108 


NF 


4 


Write attempted on protected volume 


AB109 


NF 


4 


Attempt to write tape block larger 
than MBS 
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Table D-l. Error codes for reprieve processing (continued) 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non-fatal 


Mask Value) 


Description 


AB110 


NF 


4 


Write protocol error 


AB111 


NF 


4 


Tape went off the end of the reel 


AB112 


NF 


4 


Volume is security protected 


AB113 


NF 


4 


Dataset is security protected 


AB114 


NF 


4 


Read attempted of NEW dataset 


AB115 


NF 


4 


Dataset not on this volume 


AB116 


NF 


4 


File section does not exist 


AB117 


NF 


4 


Ill-formed LDT 


AB118 


NF 


4 


Label group corrupted 


AB119 


NF 


4 


Deferred tape feature 


AB120 


NF 


4 


No HDR1 in label group 


AB121 


NF 


4 


Bad record format 


AB122 


NF 


4 


Bad blocking attributes 


AB123 


NF 


4 


Bad record length 


AB124 


NF 


4 


Bad block Length 


AB125 


NF 


4 


Bad buffer offset 


AB126 


NF 


4 


Bad owner ID 


AB127 


NF 


4 


Incomplete VSN list 


AB128 


NF 


4 


Read of expired dataset 


AB129 


NF 


4 


Write of non-expired dataset 


AB130 


NF 


4 


Invalid expiration date 


AB131 


NF 


4 


Difference in volume block counts 


AB132 


NF 


4 


Label type can not be scratched 


AB133 


NF 


4 


F$POS is illegal for mass storage 
datasets 


AB134 


NF 


4 


Large block read 


AB135 


NF 


4 


Resource not available 


AB136 


NF 


4 


Tape volume/dataset access denied 
by servicing front-end 
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Table D-l. Error codes for reprieve processing (continued) 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non-fatal 


Mask Value) 


Description 


AB137 


NF 


4 


Tape volume/dataset access denied 
due to the lack of security checks 
servicing front end 


AB138 


NF 


4 


Tape dataset has already been 
cataloged. 


AB139 


NF 


4 


Tape dataset does not reside in 
servicing front-end catalog. 


AB140 


NF 


4 


Update of dataset/volume state to 
servicing front end failed 


AB141 


NF 


4 


The tape device has been closed to 
user I/O. 


AB142 


NF 


4 


Tape volume does not reside in 
servicing front-ends catalog. 


AB143 


NF 


4 


Tape volume mount canceled by 
operator 


AB144 


NF 


4 


Maximum block size exceeded on 
write of tape dataset 



PERMANENT DATASET STATUS CODES 

The permanent dataset status octal codes are placed in the PMST field of 
the Permanent Dataset Definition Table (PDD) which is presented in 
Appendix A. PMST can also be tested as the JCL symbol PDMST (see table 
2-1 in part 3, section 2). The PDD statuses are listed in table D-2. 
The logfile contains a corresponding code (of the form PVnnn, where 
nnn is listed in table D-2) and message for most of the status 
conditions. 
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Table D-2. PDD status 



Log file 








Code 


PMST 


Status 






1 


Complete; no error 




1 


11 


No DNT found for the specified dataset 




2 


21 


Maintenance permission not granted 




3 


31 


Edition already exists 




4 


41 


DSC full 




5 


51 


Function code out of range 




6 


61 


The local dataset name (DN) specified is already 
use by the job 


in 


7 


71 


No permission granted 






101 


Delay and try again 




9 


111 


Requested dataset not in DSC 




10 


121 


Edition does not exist 




11 


131 


Active PDS full 




12 


141 


Dataset not permanent 




13 


151 


Active PDS entry not found 




14 


161 


Continuation error 




15 


171 


DAT full 




16 


201 


DNT full 






211 


End of DSC 




18 


221 


Specified permanent dataset already accessed by 
job 


this 




2 31 


Request to read zero pages 






241 


Invalid page number requested 
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Table D-2. PDD status (continued) 



Logf ile 






Code 


PMST 


Status 


21 


251 


No data has been written to disk 




261 


SDT does not exist 




271 


SDT entry not on input or output queue 




301 


Unable to queue SDT entry 


25 


311 


Dataset name in PDD is 




3 21 


Unused 




331 


Unused 


28 


341 


Unique access is not acceptable because the dataset 
is part of the System Directory. 


29 


351 


The PDD contains a text length without a text 
address, or a text address without a length specified. 


30 


361 


The text length specified exceeds the allowable 
maximum. 


31 


371 


The device on which all or part of the dataset 
resides is down. 




401 


Error occurred while rewriting the SDT, or the SDT 
name and dataset type in the DSC do not match those 
in the PDD. 




411 


Permanent dataset to be pseudo accessed is not 
available or the DAT in the DSC does not match the 
JTA DAT. 


34 


421 


Access is denied because crossed allocation unit 
exists. 


35 


431 


The dataset is already permanent. 


36 


441 


The DSC entry was flagged by Startup as containing a 
fatal error; access is denied. 
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Table D-2. PDD status (continued) 



Logf ile 






Code 


PMST 


Status 




451 


The DSC or DXT page buffer supplied is outside the 
user field length. 




461 


No available QDT entries exist. 




471 


The dataset has outstanding disposes; do not 
deallocate disk space. 


40 


501 


Allocation of multitype dataset inconsistent with 
related datasets. 


41 


511 


Multitype dataset has nonexistent QDT entry. 


42 


521 


Maximum edition reached 


43 


531 


Dataset is on an active SDT queue 


44 


541 


Bad SDT address on Enqueue SDT request 


45 


551 


Dataset is on a scratch device 


46 


561 


Access denied due to DXT error 




571 


Unused 


48 


601 


Function not implemented on this system level 


49 


611 


Maximum number of DXT entries per dataset reached 


50 


621 


Attributes dataset not local 


51 


631 


Attributes dataset not permanent 


52 


641 


Invalid notes buffer specified 


53 


651 


Invalid text buffer specified 


54 


661 


Specified permit entry not found 




671 


Invalid DXT buffer address (get/link DXT) 
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Table D-2. PDD status (continued) 



Logf ile 






Code 


PMST 


Status 




701 


Bad DXT linkage pointer (get/link DXT) 




711 


PMPDN and DCPDN do not match (get/link DXT) 




721 


Unused 




731 


PMSIZE greater than maximum PDD size 




2001 


Parameter error (internal to SSYSLIB) 




2002-2777 


This range of status codes is reserved for magnetic 
tape support. 
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GLOSSARY 



GLOSSARY 



Abort - To terminate a program or job when a condition (hardware or 
software) exists from which the program or computer cannot recover. 

Absolute address - (1) An address permanently assigned by the machine 
designator to a storage location. (2) A pattern of characters that 
identifies a unique storage location without further modification. 
Synonymous with machine address. 

Absolute block - Loader tables consisting of the image of a program in 
memory. The program image can be saved on a dataset for subsequent 
reloading and execution. 

Address - (1) An identification, as represented by a name, label, or 
number, for a register, location in storage, or any other data source or 
destination such as the location of a station in a communication 
network. (2) Any part of an instruction that specifies the location of 
an operand for the instruction. 

Allocate - To reserve an amount of some resource in a computing system 
for a specific purpose (usually refers to a data storage medium) . 

Alphabetic - A character set including, $, %, @, as well as the 26 
uppercase letters A through Z. 

Alphanumeric - A character set including all alphabetic characters and 
the digits through 9. 

Arithmetic operator - Part of an expression that indicates action to be 
performed during evaluation of expression; can be symbolic character 
representing addition, unary plus, subtraction, unary minus, 
multiplication, or division. 

Assemble - To prepare an object language program from a symbolic language 
program by substituting machine operation codes for symbolic operation 
codes and absolute or relocatable addresses for symbolic instructions. 



B 

Base address - The starting absolute address of the memory field length 

assigned to the user's job. This address is maintained in the Base 

Address (BA) register. The base address must be a multiple of 2O3. 
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$BLD - A dataset on which load modules are placed by a compiler or 
assembler unless the user designates some other dataset. 

Blank common block - A common block where data cannot be stored at load 
time. The first declaration need not be the largest. The blank common 
block is allocated after all other blocks have been processed. 

Block - (1) A tape block is a collection of characters written or read as 
a unit. Blocks are separated by an interblock gap and can be from 1 
through 1,048,576 bytes. A tape block and a physical record are 
synonymous on magnetic tape. (2) In COS blocked format, a block is a 
fixed number of contiguous characters with a block control word as the 
first word of the block. The internal block size for the Cray mainframe 
is 512 words (one sector on disk). In COS manuals, the terms tape block 
and 512-word block are consistently used to distinguish between the two 
uses. 

Block control word - A word occurring at the beginning of each block in 
the COS blocked format that identifies the sequential position of the 
block in the dataset and points forward to the next block control word. 

BOT - Beginning of tape; the position of the beg inning -of -tape reflective 
marker. 

BOV - Beginning of volume. See BOT. 

BPI - Bits per inch. COS supports the 1600 and 6250 bpi recording 
densities. 

Buffer - A storage device used to compensate for the difference in rate 
of flow of data, or time of occurrence of events, when transmitting data 
from one device to another. It is normally a block of memory used by the 
system to transmit data from one place to another. Buffers are usually 
associated with the I/O subsystem. 

Buffer Memory - A 64-bit memory in the I/O Subsystem common to all I/O 
Processors. 



Call - The transfer of control to a specified routine. The called 
routine normally transfers control back to the caller after the called 
routine has finished its task. 

Card image - A one-to-one representation of the contents of a punched 
card, for example, a matrix where a 1 represents a punch and a 
represents the absence of a punch. In COS blocked format, each card 
image is a record. 

Catalog (noun) - A list or table of items with descriptive data, usually 
arranged so that a specific kind of information can be readily located. 
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Channel - A path along which signals can be sent. 

Character - A logical unit composed of bits representing alphabetic, 
numeric, and special symbols. The Cray software processes 8-bit 
characters in the ASCII character set. 

Code - (1) A system of character and rules representing information in a 
form understandable by a computer. (2) Translation of a problem into a 
computer language. 

Common block - A block that can be declared by more than one program 
module during a load operation. More than one program module can specify 
data for a common block but if a conflict occurs, information from later 
programs is loaded over previously loaded information. A program can 
declare no common blocks or as many as 125 common blocks. The two types 
of common blocks are labeled and blank. 

Conditional control statement block - Defines the conditions under which 
a group of control statements are to be processed. The statements which 
define the block and conditions are: IF, ELSE, ELSEIF, and ENDIF. 

Control statement - The format, consisting of a verb and its parameters, 
used to control the operating system and access its products. Directives 
are used to control products. 

Control statement input file - A dataset containing valid control 
statements as its first file. 

COS - The Cray Operating System described in this manual. 

3CS - A primary control statement input file. 

CSP - The Control Statement Processor (CSP) is a system program that 
executes in the user field. CSP initiates the job, analyzes, and stores 
the various elements of the control statements (that is, cracks them) , 
processes system verbs, advances the job step by step, processes errors, 
and ends the job. 



D 

Data - (1) Information manipulated by or produced by a computer program. 
(2) Empirical numerical values and numerical constants used in arithmetic 
calculation. Data is considered to be that which is transformed by a 
process to produce the evidence of work. Parameters, device input, and 
working storage are considered data. 
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Dataset - A quantity of information maintained on mass storage by the 
Cray Operating System. Each dataset is identified by a symbolic name 
called a dataset name. Datasets are of two types: temporary and 
permanent. A temporary dataset is available only to the job that created 
it. A permanent dataset is available to the system and to other jobs and 
is maintained across system deadstarts. 

Dataset characteristic information - The information that describes where 
the dataset resides, how large it is, its permanent name, edition number, 
information about the creating job, etc. 

Dataset name verb - A verb that is the name of a dataset. See local or 
system dataset name verb. 

Deadstart - The process by which an inactive machine is brought up to an 
operational condition ready to process jobs. 

Debug - To detect, locate, and remove mistakes from a routine or 
malfunction of a computer. Synonymous with troubleshoot. 

DEC - Disk Error Correction, a task within the STP portion of COS. DEC 
can be called by the Disk Queue Manager (DQM) to attempt correction of a 
disk error. 

Delimiter - A character that separates items in a control statement or a 
directive; synonymous with separator. 

Density - See tape density. 

Device - A piece of equipment that mechanically contains and drives a 
recording medium. 

Directive - A command used to control a product, such as UPDATE. 

Diagnostic - (1) Pertaining to the detection and isolation of a 
malfunction or a mistake. (2) A message printed when an assembler or 
compiler detects a program error. 

Disposition code - A code used in I/O processing to indicate the 
disposition to be made of a dataset when its corresponding job is 
terminated or the dataset is released. 

DQM - The Disk Queue Manager is a task within the STP portion of COS. 
DQM controls the simultaneous operation of disk storage units on CPU I/O 
channels or on the I/O Subsystem. 

Dump - (1) To copy the contents of all or part of a storage device, 
usually from internal storage, at a given instant of time. (2) The 
process of performing (1) . (3) The document resulting from (1) . 
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E 

End-of-data delimiter - Indicates the end of a dataset. In COS blocked 
format, this is a record control word with a 173 in the mode field. 

End-of-file delimiter - Indicates the end of a file. (1) In COS blocked 
format, this is a record control word with a I63 in the mode field. 
(2) On magnetic tape, this is a tapemark. 

End-of-record delimiter - Indicates the end of a record. (1) In COS 
blocked format, this is a record control word with a 10 3 in the mode 
field. (2) In an ASCII punched deck, this is indicated by the end of 
each card. 

Entry point - A location within a block that can be referenced from 
program blocks that do not declare the block. Each entry point has a 
unique name associated with it. The loader is given a list of entry 
points in a loader table. A block can contain any number of entry points. 

An entry point name must be 1 to 8 characters and cannot contain the 
characters blank, asterisk, or slash. Some language processors (for 
example, FORTRAN) can produce entry point names under more restricted 
formats due to their own requirements. 

EOD - End-of-data on tape. The definition of EOD is a function of 
whether the tape is labeled or nonlabeled and of the type of operation 
being performed (input or output) . When reading a labeled tape, EOD is 
returned to the user when an EOF1 trailer label is encountered. When 
reading a nonlabeled tape, EOD is returned when a tapemark is read on the 
last volume in the volume list for a particular dataset. When writing a 
labeled or nonlabeled tape, EOD processing is initiated by a write EOD, 
rewind, close, or release request. 

EOF - End-of-file on tape, sometimes used to mean end of tape trailer 
group. 

EOI - End-of-information; see EOD. 

EOT - End-of-tape; a status, set only on a write operation indicating 
sensing of the end of the tape reflective marker. 

EOV - End-of -volume. On output, EOV occurs when end-of-tape status is 
returned on a write operation. This status occurs when the EOT 
reflective marker is sensed by the tape device. For input of a labeled 
tape dataset, EOV occurs when an EOV1 trailer label is read; for input of 
a nonlabeled dataset, EOV is returned when a tapemark is encountered and 
the volume list is not exhausted. 
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Exchange package - A 16-word block of data in memory which is associated 
with a particular computer program or memory field. It contains the 
basic parameters necessary to provide continuity from one execution 
interval for the program to the next. 

EXEC - The COS System Executive (EXEC) is the control center for the 
operating system. It alone accesses all of memory, controls the I/O 
channels, and selects the next program to execute. 

EXP - The User Exchange Processor (EXP or UEP) is a task within the STP 
portion of COS. The Exchange Processor task processes all user system 
action requests and user error exits. The Exchange Processor also 
handles certain requests from the Job Scheduler (JSH) to initiate or 
abort a job. 

Expression (JCL parameter expression) - A series of characters grouped 
into operands and operators which are computed as one value during 
parameter evaluation; should be delimited by parentheses. 

External reference - A reference in one program block to an entry point 
in a block not declared by that program. Throughout the loading process, 
externals are matched to entry points (this is also referred to as 
satisfying externals) ; that is, addresses referencing externals are 
supplied with the correct address. 



File - A collection of records in a dataset. In COS blocked format, a 
file is terminated by a record control word with 163 in the mode field. 

Filemark - See to tapemark . 

Foreign label - A special condition that can occur during the label scan 
at the beginning of a tape. If a NOT CAPABLE status is returned on a BOV 
label scan, TQM declares the tape to be foreign labeled (FRN) which 
protects a 7-track tape or a 9-track, 800 bpi tape from being accidently 
destroyed. 

Formal parameter specifications - Parameters in a procedure definition 
which identify the character strings within the procedure body that can 
be substituted during the procedure's evaluation. 

Front-end dataset servicing - The act of requesting and receiving 
information concerning a particular dataset that is known to the 
front-end computer system. Typical servicing is: 

• Direct operator messages concerning tape volume/drive activity, 

• Obtaining required information concerning a dataset, such as what 
volumes it resides on, the expiration date of each volume, access 
permissions, etc., and 
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• Updating information for a dataset and/or tape volume for use by 
that computer system. 

Front-end processor - A computer connected to a Cray Computer System 
channel. The front-end processor supplies data and jobs to the Cray 
mainframe and processes or distributes the output from the jobs. 
Front-end systems are also referred to as stations in Cray publications. 



Generic name - Tape resource requirements are expressed using 
installation-defined generic names. COS supports up to 16 generic 
names. A generic device name is used to group tape devices according to 
some common characteristics. Generic names are defined at system 
assembly time. Installations can define additional generic names 
according to their needs. Standard COS provides one generic device name; 

*TAPE Device capable of 6250 and 1600 bpi 



H 

HLM - High limit of memory, the highest memory address available to the 
user for program and data area. This is refered to by W@JCHLM in figure 
A-l in Appendix A. 



$IN - A dataset containing the job control language statements as well as 
the source input and data for compilers and assemblers, unless the user 
designates some other dataset (FT05 for example) . 

In-line procedure - A procedure defined in a control statement file. 

Input/Output - (1) Commonly called I/O. To communicate from external 
equipment to the computer and vice versa. (2) The data involved in such 
a communication. (3) Equipment used to communicate with a computer. (4) 
The media carrying the data for input/output. 

Integer constant - Specifies an octal value or a decimal value that can 
be signed as positive or negative. 
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Interchange format - One of the two ways in which tape datasets can be 
read or written. Each tape block of data corresponds to a single logical 
record in COS blocked format. Interchange format is selected by setting 
DF=IC when a tape dataset is accessed. As far as I/O routines in the 
Cray mainframe are concerned, interchange datasets must be in COS blocked 
format because the COS blocked structure (BCWs and RCWs) is used to 
describe each tape block read or written. This blocked structure allows 
the user to write or read variable-length tape blocks at high speed with 
data resolution to the 8-bit byte level of the tape device. The record 
control word (RCW) is used to define the tape block length on output and 
to describe the block length on input. No BCW or RCW ever appears in the 
data written on the tape. 

Interblock gaps - The physical separation between successive tape blocks 
on magnetic tape. 

I/O Subsystem - Part of a CRAY-1 S Series Model S/1200 through S/4400, 
all models of the CRAY-1 M Series and CRAY X-MP Computer Systems 
consisting of two to four I/O processors and one-half, one, four, or 
eight million words of shared Buffer Memory. The optional tape subsystem 
is composed of at least one block multiplexer channel, one tape 
controller, and two tape units. The tape units supported are 
IBM-compatible 9-track, 200 ips, 1600/6250 bpi devices. 

Iterative control statement block - Defines the repeated execution of a 
series of statements if a condition is satisfied. 



JCL block control statement - A statement in the control statement file 
that is part of a group of control statements called a block which 
specifies an action to be taken by COS; the three types of blocks are: 
procedure defintion, conditional, and iterative. 

JCM - The Job Class Monitor is a task within the STP portion of COS. JCM 
assigns every job to a job class (see JOB statement description) before 
it enters the input queue. 

Job - (1) An arbitrarily defined parcel of work submitted to a computing 
system. (2) A collection of tasks submitted to the system and treated by 
the system as an entity. A job is presented to the system as a formatted 
dataset. With respect to a job, the system is parametrically controlled 
by the content of the job dataset. 

Job Communication Block - The first 200 3 words of the job memory 
field. This area is used to hold the current control statement and 
certain job-related parameters. The area is accessible to the user, the 
operating system, and the loader for inter-phase job communication. 
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Job control statement - Any of the statements used to direct the 
operating system in its functioning, as compared to data, programs, or 
other information needed to process a job but not intended directly for 
the operating system itself. A control statement can be expressed in 
card, card image, or user terminal keyboard entry medium. 

Job deck - The physical representation of a job before processing either 
as a deck of cards or as a group of records. The first file of the job 
dataset contains the job statements and the job parameters which will be 
used to control the job. Following files contain the program and data 
which the job will require for the various job control statements. The 
job deck is terminated by an end-of-data delimiter. 

Job input dataset - A dataset named $IN on which the card images of the 
job deck are maintained. This consists of programs and data referenced 
by various job steps. The user can manipulate the dataset like any other 
dataset (excluding write operations) . 

Job output dataset - Any of a set of datasets recognized by the system by 
a special dataset name (for example, $OUT, SPLOT, and SPUNCH) , which 
becomes a system permanent dataset at job end and is automatically staged 
to a front-end computer for processing. 

Job step - A unit of work within a job, such as source language 
compilation or object program execution. 

JSH - The Job Scheduler (JSH) is a task within the STP portion of COS. 
The Job Scheduler task initiates the processing of a job, selects the 
currently active job, manages job roll-in and roll-out, and terminates a 
job. 



K 

Keyword parameter - A string of 1 to 8 alphanumeric characters that 
consists of a keyword followed by one or more values; identified by its 
form rather than by its position in the control statement. 



L 

$LOG - See logfile. 

Label group - A group of tables that precede and follow the user data at 
dataset and/or volume boundary conditions. The label group describes the 
characteristics of the volume or dataset. 

Labeled common - A common block into which data can be stored at load 
time. 
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Library - A dataset composed of sequentially organized records and 
files. The last file of the library contains a library directory. The 
rest of the files and records, known as entries, can consist of processed 
procedure definitions and/or relocatable modules. The directory gives a 
listing of entry names with their associated characteristics. 

Library -defined verb - A 1- through 8-character name of a program or 
procedure definition residing in a library that is a part of the current 
library searchlist. 

Limit address - The upper address of a memory field. This address is 
maintained in the limit address (LA) register. 

Literal - A symbol which names, describes, or defines itself and not 
something else that it might represent. 

Literal constant - A string of 1 through 8 characters delimited with 
apostrophes whose ordinal numbers are in the range 040s through 1763; 
value of a character constant corresponds to the ASCII character codes 
positioned within a 64-bit word; alignment indicated can be left- or 
right-adjusted and zero-filled or left-adjusted and space-filled; 
apostrophes remain as part of value. 

Literal string - A string delimited with apostrophes which are normally 
not treated as part of the value, except with JCL block control 
statements which treat the apostrophes as part of the string value. 

Loader tables - The form in which code is presented to the loader. 
Loader tables are generated by compilers and assemblers according to 
loader requirements. The tables contain information required for loading 
such as type of code, names, types and lengths of storage blocks, data to 
be stored, etc. 

Loading - The placement of instructions and data into memory so that it 
is ready for execution. Loader input is obtained from one or more 
datasets and/or libraries. Upon completion of loading, execution of the 
program in the job's memory field is optionally initiated. Loading can 
also involve the performance of load-related services such as generation 
of a loader map, presetting of unused memory to a user-specified value, 
and generation of overlays. 

Load point - See BOT. 

Local dataset - A temporary or permanent dataset accessible by the user. 

Local dataset name verb - A verb that is the name of a local dataset 
consisting of an alphabetic character followed by 1 through 6 
alphanumeric characters. Requests that COS load and execute an absolute 
binary program from the first record of the named dataset. 
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Log file - During the processing of the job, a special dataset named $LOG 
is maintained. At job termination, this dataset is appended to the $OUT 
file for the job. The job logfile serves as a time-ordered record of the 
activities of the job — all control statements processed by the job, 
significant information such as dataset usage, all operator interactions 
with a job, and errors detected during processing of the job. 

Logical operator - Represents logical function performed on operands on a 
bit-by-bit basis, returning a 64-bit result; functions are: inclusive 
OR, intersection, exclusive OR, unary complement. 



M 

Macro instruction - An instruction in a source language that is 
equivalent to a specified sequence of machine instructions. 

Magnetic tape - A tape with a magnetic surface on which data can be 
stored by selective polarization of portions of that surface. 

Mainframe - The central processor of the computer system. It contains 
the arithmetic unit and special register groups. It does not include 
input, output, or peripheral units and usually does not include internal 
storage. Synonymous with central processing unit (CPU) . 

Mass storage - The storage of a large amount of data that is also readily 
accessible to the central processing unit of a computer. 

MEP - The Error Message Processor (MEP) is a task within the STP portion 
of COS. Error messages are passed from the System Executive (EXEC) to 
the Log Manager (MSG) through the Error Message Processor. 

MSG - The Log Manager (MSG) is a task within the STP portion of COS. MSG 
writes messages in the system and user log files. 

Multiprocessing - Use of several computers to logically or functionally 
divide jobs or processes; and to execute various programs or segments 
asynchronously and simultaneously. 

Multiprogramming - A technique for handling multiple routines or programs 
simultaneously by overlapping or interleaving their execution, that is, 
permitting more than one program to time-share machine components. 



N 

Nesting - Including a block of statements of one kind into a larger 
block of statements of the same kind, such as an iterative block within a 
larger iterative block. 
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Not Capable - A tape status indicating the reel currently mounted cannot 
be read by the control unit and drive. The Not Capable status would be 
returned if an 800 bpi tape were mounted on a device that supported only 
1600 and 6250 bpi, for example. Since it is not possible to read a Not 
Capable tape to verify label type and contents, COS rejects (unloads) all 
tapes that return a Not Capable status. 



O 

$OUT - A dataset that contains the list output from compilers and 
assemblers unless the user designates some other dataset. At job end, 
the job logfile is added to the $OUT dataset and the dataset is sent to a 
front-end computer. 

Operand - A character string in an expression that is operated on during 
evaluation; types are integer constant, literal constant, symbolic 
variable, and subexpresion. 

Operating system - (1) The executive, monitor, utility, and any other 
routines necessary for the performance of a computer system. (2) A 
resident executive program that automates certain aspects of machine 
operation, particularly as they relate to initiating and controlling the 
processing of jobs. 

Operator - A symbolic representation indicating the action to be 
performed in an expression; types are arithmetic, relational, and logical 
operators. 

Overlaying - A technique for bringing routines into memory from some 
other form of storage during processing so that several routines will 
occupy the same storage locations at different times. Overlaying is used 
when the total memory requirements for instructions exceeds the available 
memory . 

OVM - The Overlay Manager (OVM) is a part of the STP portion of COS and 
manages the use of the overlaid portion of COS itself. 



P 

$PR0C - A dataset to which in-line procedure definitions are written. 

Parameter - A quantity in a control statement which can be given 
different values when the control statement is used for a specific 
purpose or process. 
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Parcel - A 16-bit portion of a word which is addressable for instruction 
execution but not for operand references. An instruction occupies one or 
two parcels; if it occupies two parcels, they can be in separate words. 

Parenthetic string - A string delimited with parentheses instead of 
apostrophes; parentheses are treated as part of the string when evaluated 
except when preceded by an initial, parameter, equivalence, or 
concatenation separator character. 

PPM - The Permanent Dataset Manager (PDM) is a task within the STP 
portion of COS and provides the means for creating, accessing, deleting, 
maintaining, and auditing disk-resident permanent datasets. 

Permanent dataset - A dataset known to the operating system as being 
permanent; the dataset survives deadstart. 

Positional parameter - A parameter that must appear in a precise position 
relative to the separators in the control statement. 

Procedure - A named sequence of control statements and/or data that is 
saved in a library for processing at a later time when activated by a 
call to its name by a calling statement; provides the capability of 
replacing values within the procedure with other values. 

Procedure definition - The definition of a procedure saved in a library 
to be called for processing at a later time; if defined in a job control 
statement is called an in-line procedure definition. 

Program - (1) A sequence of coded instructions that solves a problem. 
(2) To plan the procedures for solving a problem. This can involve 
analyzing the problem, preparing a flow diagram, providing details, 
developing and testing subroutines, allocating storage, specifying I/O 
formats, and incorporating a computer run into a complete data processing 
system. 

Program block - The block within a load module usually containing 
executable code. It is automatically declared for each program (though 
it can be zero-length). It is local to the module; that is, it can be 
accessed from other load modules only through use of external symbols. 
Data placed in a program block always comes from its own load module. 

Program name - Also referred to as IDENT name or deck name, the name 
contained in the loader PDT table at the beginning of each load module. 

Program library - (PL) The base dataset used by the UPDATE utility. This 
dataset consists of one or more specially formatted card image decks, 
each separated by an end-of-file. 
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Record - A group of contiguous words or characters related to each other 
by virtue of convention. A record is fixed or variable length. (1) In 
COS blocked format, a record ends with a record control word with 10g 
in the mode field. (2) In an ASCII-coded punched deck, each card is a 
record. (3) For a listable dataset, each line is a record. (4) For a 
binary load dataset, each module is a record. 

Relational operator - An operator that indicates the comparison to be 
performed between the operands in an expression (-1 for a TRUE result and 
for a FALSE result) ; types are equal, not equal, less than, greater 
than, less than or equal, and greater than or equal. 

Relative address - An address defined by its relationship to a base 
address (BA) such that the base address has a relative address of 0. 

Relocatable address - An address presented to the loader in such a form 
that it can be loaded anywhere in the memory field. A relocatable 
address is defined as being relative to the beginning address of a load 
module program block or common block. 

Relocatable module - This is the basic program unit produced by a 
compiler or assembler. CAL produces a relocatable module from source 
statements delineated by IDENT and END. In FORTRAN, the corresponding 
beginning statements are PROGRAM, SUBROUTINE, BLOCK DATA, or FUNCTION. 
The corresponding end statement is END. 

A relocatable module consists of several loader tables that define 
blocks, their contents, and address relocation information. 

Relocate - In programming, to move a routine from one portion of internal 
storage to another and to adjust the necessary address references so that 
the routine can be executed in its new location. Instruction addresses 
are modified relative to a fixed point or origin. If the instruction is 
modified using an address below the reference point, relocation is 
negative. If addresses are above the reference point, relocation is 
positive. Generally, a program is loaded using positive relocation. 



SCP - The Station Call Processor (SCP) is a task within the STP portion 
of COS and handles communications with front-end computer systems. 

Sector - A physical area on disk equivalent to 512 Cray words. In COS 
blocked format, a block is also 512 contiguous words with a block control 
word as the first word of the block. Therefore the internal block size 
for the Cray is equivalent to one Cray disk sector. This is the unit of 
data transfer between the Cray mainframe and the I/O Subsystem. 
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SPM - The System Performance Monitor (SPM) is the task within COS that 
collects and reports statistics about COS system performance. 

STG - Stager (STG) task is a subtask of SCP within the STP portion of COS 
that handles dataset transfers between the Cray mainframe and its 
front-end processors. 

STP - The System Task Processor (STP) is the main portion of the COS 
operating system and consists of tables, a set of routines called tasks, 
and some re-entrant routines common to all tasks. 

Separator - Synonym for delimiter. 

String - A sequence of characters delimited by apostrophes or parentheses 
which is taken literally as a parameter value; see literal string and 
parenthetic string. 

Subexpression - An expression that is evaluated so that its result 
becomes an operand. 

Substitution parameters - Parameters on procedure definition prototype 
statement or procedure calling statement which provide replacement values 
to be substituted during evaluation for strings flagged within the 
procedure body. 

Symbolic variable - A string of 1 to 8 alphanumeric characters, beginning 
with an alpha character that represents values maintained by COS and/or 
the user. 

System dataset name verb - A verb that is the name of a system-defined 
dataset in the System Directory Table (SDR) ; consists of an alphabetic 
character which can be followed by 1 through 6 alphanumeric characters. 

System logfile - A permanent dataset named $SYSTEMLOG. 

System verb - Requests that COS perform a function; consists of an 
alphabetic character which can be followed by 1 through 6 alphanumeric 
characters 



T 

Table - A collection of data, each item being uniquely identified either 
by some label or by its relative position. 

Tape block - A group of contiguous characters recorded on and read from 
magnetic tape as a unit. 
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Tape control unit - A piece of equipment connected to a block multiplexer 
channel that provides the capability for controlling the operation of one 
or more tape devices. Up to four control units can be combined to drive 
a maximum of 16 tape devices. The control units are cross connected to 
all devices. Such a configuration is called a 4x16 (four by sixteen) . 
If one control unit were to be connected to three devices, it would be 
referred to as a 1x3 configuration. 

Tape density (bpi) - The number of bits per inch on magnetic tape. COS 
supports 6250 bpi and 1600 bpi. 

Tape format - The way tape datasets are read or written. In 
interchange format, each tape block of data corresponds to a single 
logical record in COS blocked format. In transparent format, each tape 
block is a fixed multiple of 512 words based on the density of the tape. 

Tape volume - A reel of magnetic tape. 

Tapemark - A special hardware bit configuration recorded on magnetic 
tape. It indicates the boundary between combinations of datasets and 
labels. It is sometimes called a filemark. 

Temporary dataset - A dataset which is not permanent and is available 
only to the job that created it. 

Time slice - The maximum amount of time during which the CPU can be 
assigned to a job without re-evaluation as to which job should have the 
CPU next. 

Time stamp - A 1-word binary number that represents specific date and 
time. Timestamps are expressed as the number of (nanosecond/1.024) units 
between the date/and time in question and midnight, 1 January 1973. 
Timestamps appear in machine-independent tables used by the operating 
system. 

TQM - The Tape Queue Manager (TQM) is the System Task Processor (STP) 
task that manages tape I/O between one or more user jobs and the I/O 
Subsystem. 

Transparent format - One of two ways tape datasets are read or written. 
Each tape block is a fixed multiple of 512 words. Transparent format is 
the default tape dataset format and is designated by setting DF=TR when 
accessing a tape dataset. This format produces a fixed-length block 
dataset (16384 bytes at 1600 bpi or 32768 bytes at 6250 bpi) that can be 
a COS blocked or unblocked dataset as far as any I/O routines are 
concerned. The tape subsytem merely takes four (1600 bpi) or eight (6250 
bpi) sectors and processes them as one physical tape block* When a short 
block is read, it is considered to be EOD. 
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UEP - User Exchange Processor. See EXP. 

Unit record device - A device such as a card reader, printer, or card 
punch for which each unit of data to be processed is considered a record. 

Unload - To remove a tape from ready status by rewinding beyond the load 
point. The tape is then no longer under control of the computer. 

Unsatisfied external - An external reference for which the loader has not 
yet loaded a module containing the matching entry point. 

User field - A portion of memory containing instructions and data defined 
for a specific job. Field limits are defined by the base address and the 
limit address. A program cannot execute outside of its field nor refer 
to operands outside of its field. 

User logfile - A dataset named SLOG created for a job when it is 
initiated by the Job Scheduler. 



Verb - The first nonblank field of a control statement; specifies the 
action to be taken by COS during control statement evaluation. 

Volume - A physical unit of storage media that can be dismounted from a 
storage device, for example, a reel of magnetic tape. 

Volume identifier - Up to 6 alphanumeric characters used to identify a 
physical reel of tape. On labeled tapes, the volume identifier is 
actually recorded on tape in the volume header label. Volume identifier 
is synonomous with volume serial number. 

VSN - Volume serial number. See volume identifier. 



W 

Word - A group of bits between boundaries imposed by the computer. Word 
size must be considered in the implementation of logical divisions such 
as character. The word size of the CRAY-1 and CRAY X-MP computers is 64 
bits. 
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* control statement, (2)2-6 

A parameter, (2)3-4, (2)6-6 

h=adn parameter, (2)8-11 

A=un parameter, (2)3-1, (2)3-4 

A&=adn parameter, (2)9-1, (2)9-3 

Abort 

advance, (1)3-3 

no, (2)4-3, 4-6, 4-13, 4-15, 4-16 
parameter, no, (2)9-6 
ABORT=ac parameter, (2)8-11, (2)8-12 
Absolute 

binary parameter, (2)9-3 
load module, (2), 1-15 
ABTCODE symbol, (3)2-3 
AC=ao parameter, (2)2-10, (2)2-11 
Access 

mode, (2)1-4, (2)1-6, (2)1-7, (2)1-8, 
(2)4-3, (2)4-4, (2)4-12, (2)4-14, 
(2)4-16, (2)5-4, (2)6-8, (2)6-10, 
A-19, A-20 
permanent dataset, (2)4-5 
to dataset, explicitly control, (2)4-16 
ACCESS control statement, (2)1-5, (2)4-5 
ACCOUNT, (1)3-2, (1)4-1, (1)4-2, (2)1-2, 
(2)1-10, (2)2-1, (2)2-10, (2)2-11, 
(2)6-1, A-4, A-20 

control statement, (2)2-10 
number, (2)2-11 
password, (2)2-11 
Accounting, (1)3-2, (1)3-10, (1)3-11, 
(1)3-12, (1)4-2, (2)1-3, (2)2-10, 
(2)2-11, (2)2-17, A-l, A-15 
job step, (2)2-11 
ACQUIRE control statement, (1)4-3, (2)1-7, 
(2)1-8, (2)1-9, (2)1-10, (2)1-11, 
(2)1-12, (2)1-13, (2)4-18, (2)5-1, 
(2)5-2, (2)5-3, (2)5-4, (2)5-9, A-15, D-l 
Additional user identification parameter, 
(2)4-2, (2)4-6, (2)4-16, (2)5-2, (2)5-7 
Adjust $DUMP, (2)8-2 

ADJUST control statement, (1)2-12, (1)4-3, 
(2)1-5, (2)3-4, (2)4-1, (2)4-7, (2)4-12, 
(2)9-16 
Advance, abort, (1)3-3 
Advancement, job, (1)3-3 
Analytical aids, (2)1-1, (2)1-14, (2)8-1, 

(3)2-7 
Apostrophes, (3)4-7, (3)4-8, (3)4-11, 

(3)4-12 
Arithmetic operators, (3)2-6 
ASCII character set, (2)4-11, B-l 
ASSIGN control statement, (1)1-7, (1)2-2, 
(1)2-3, (1)2-5, (1)2-10, (1)2-13, (1)4-3, 
(2)1-3, (2)2-17, (2)3-1, (2)4-5, (2)8-2 



Attribute 

association, (2)1-8, (2)1-10 
establishment, (2)1-7 
Attributes dataset, (2)1-8, (2)4-4, (2)4-16 

name parameter, (2)5-4 
AUDIT control statement, (2)1-6, (2)1-13, 
(2)4-4, (2)4-15, (2)5-5, (2)6-1, (2)6-7, 
(3)4-10 

examples, (2)6-14 
Auxiliary I/O Processor (XIOP) , (1) 1-6 



B registers, (2)8-3 

B=bdn parameter, (2)6-8, (2)8-11, 

(2)10-1, (2)10-2 
BA, see Base Address 
BACKSPACE, (1)2-3 
Base Address (BA) , (1)1-5 
Begin 

conditional block, (3)3-1 
iterative block, (3)3-3 
procedure definition, (3)4-3 
Begin Code Execution Table (BGN) , A-21 
BFI=bfi parameter, (2)3-1, (2)3-4 
Bidirectional transfer mode, (2)2-4 
Binary, (2)1-15 

parameter, absolute, (2)9-3 
Blank 

common, (2)9-6, (2)9-8, (2)9-9, 

(2)9-12, (2)9-15, (2)9-16, (2)9-19, 
(2)9-20, (2)9-28, A-21 
compression, (1)2-5, (2)3-4, A-8, A-23 
field initiator, (1)2-5 
Block 

control statements, (1)4-5, (3)2-2 
control word, (2)1-14, (2)7-1, (2)7-5 

format, (1)2-5 
Multiplexer channels, (1)1-8 
Blocked 

datasets, (1)2-4, (2)8-10, (2)8-19 
format, (1)2-4, (1)2-7, (1)2-9, 

(1)2-10, (1)3-13, (2)3-3, (2)5-3, 
(2)5-6, (2)5-11, (2)7-1, (2)8-8, 
(2)8-10, A-12 
Blocks parameter, (2)8-19 
BLOCKS=blk parameter, (2)8-7, (2)8-8 
BS=blk parameter, (2)3-1, (2)3-2 
B1=option parameter, (2)2-3, (2)2-4 
Buffer Memory, (2)2-13 
Buffer size, (2)3-2 

BUILD control statement, (1)5-1, (1)5-2, 
(2)1-15, (2)1-16, (2)4-5, (2)8-18, 
(2)9-3, (2)9-9, (2)10-1, (3)1-10 
directives, (2)10-1, (2)10-3, (2)10-5 
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Bulletin, (1)3-13 

Burstable listing parameter, (2)8-18 



C parameter, (2)6-3 

CAL, (1)1-1, (1)2-16, (1)4-4, (2)1-14, 
(2)4-5, (2)8-1, (2)8-6, (2)8-7, (2)8-15, 
(2)8-18, (2)9-2, (2)9-4, (2)9-5, (2)9-12, 
(2)9-14, (2)9-20, (2)9-22, (2)9-24, 
(2)9-25, (2)9-26, (2)9-28, (2)9-31, 
(2)9-32, (2)10-2, (2)10-9, (3)4-2, 
(3)4-5, (3)4-9, (3)4-10, (3)4-12, A-3 
CALL control statement, (1)4-1, (1)4-3, 
(1)5-1, (2)1-1, (2)1-2, (2)2-1, (2)2-9, 
(2)2-15, (3)1-4, (3)1-9, (3)1-10, (3)4-2, 
(3)4-4, (3)4-5, (3)4-6, (3)4-7, (3)4-11, 
(3)4-13, D-2 
$CCS, (1)4-7 

CENTER parameter, (2)8-2, (2)8-3 
Central Memory, (1)1-1, (1)1-2, (1)1-3, 

(1)1-4, (1)3-4, (2)1-4 
Change symbol value, (2)2-13 
Channels, Block Multiplexer, (1)1-8 
Character 

conversion, (2)4-11 
set, (2)4-11, A-12, A-15, B-l 
CHARGES control statement, (2)1-2, (2)2-1, 

(2)2-11, (2)2-12, A-3 
CIO, see Circular I/O routines 
Circular I/O routines (CIO) , (1) 2-16 
CL=jan parameter, (2)2-1, (2)2-3 
Class, job, (2)2-3 
CNS parameter, (2)2-9, (2)9-1, (2)9-6, 

(2)9-9, (3)1-9, (3)1-10 
Comment, (1)4-1, (2)6-10, (2)8-1, (2)8-8, 
(2)8-22, (2)9-7, (2)9-9, (2)9-12, (3)1-2 
control statement, (2)2-6 
C0MMENT=" string' parameter, (2)8-8 
Common, blank, (2)9-6, (2)9-8, (2)9-9, 
(2)9-12, (2)9-15, (2)9-16, (2)9-19, 
(2)9-20, (2)9-28, A-21 
COMPARE control statement, (2)1-14, (2)8-1, 

(2)8-10, (2)8-11, (2)8-12 
Compare datasets, (2)8-10 
Compare width parameter, (2)8-12 
Compressed load parameter, (2)9-5 
Compression, blank, (1)2-5, (2)3-4, A-8, 

A-23 
Conditional block, (1)3-8, (3)1-2, (3)1-3, 
(3)1-4, (3)1-5, (3)1-6, (3)1-8, (3)3-1, 
(3)3-2, (3)3-3, A-26 
begin, (3)3-1 
end, (3)3-2 

with ELSE, (3)1-3, (3)1-4 
with ELSEIF and ELSE, (3)1-6 
with ELSEIF, (3)1-5 
Constants, (3)2-1, (3)2-2 
Context printed parameter, (2)8-11 
Control 

detection of nonrerunnable functions, 

(2)2-7 
statement blocks, (3)3-1 
Statement Processor (CSP) , (1)2-12, 

3-4, 3-12 
statement separators, (1)4-5 



Control (continued) 

user's access to I/O area, (2)2-8 
word, (1)1-7, (1)2-5, (1)2-6, (1)2-8, 
(1)2-13, (2)1-4, (2)1-7, (2)1-14, 
(2)4-2, (2)4-3, (2)4-6, (2)4-7, 
(2)4-13, (2)4-14, (2)4-15, (2)5-2, 
(2)5-3, (2)5-8, (2)6-3, (2)6-6, 
(2)6-9, (2)7-1, (2)7-5, A-10, A-17 
block, (1)2-5, (2)1-14, (2)7-1, 

(2)7-5 
maintenance, (2)4-3, 4-7 
write, (2)4-3, 4-7 
Conventions, (1)4-7 
Conversion, character, (2)4-11 
Copy 

dataset, (2)7-3 
files, (2)7-2 
records, (2)7-1 
COPY directive, (2)10-3, (2)10-4, (2)10-5, 

(2)10-6, (2)10-7 
COPYD, (2)1-13, (2)7-1, (2)7-3 

control statement, (2)7-3 
COPYF, (2)1-13, (2)2-17, (2)7-1, (2)7-2 

control statement, (2)7-2 
COPYR, (2)1-13, (2)7-1, (3)1-8 

control statement, (2)7-1 
COS job processing, (1)3-1 
CP=epn parameter, (2)8-11 
CR parameter, (2)6-6 
Crack next control statement parameter, 

(2)9-6 
Cracking, (1)4-7 

Cray Computer System configuration, (1)1-3 
CRAY X-MP Exchange Package, C-2 
CRAY-1 Exchange Package, C-l 
Create *DUMP, (2)8-1 
Cross-reference listing, (2)1-14, (2)8-1, 

(2)8-15, (2)8-17 
$CS, (1)3-3, (1)3-10, (1)4-1, (2)4-5, 

(2)4-11, (2)8-11, (3)1-2, (3)1-9, A-7, C-2 
CS=asn parameter, (2)8-11 
CSP, see Control Statement Processor 
CW=ew parameter, (2)6-2, (2)6-3, (2)6-5, 
(2)6-6, (2)6-8, (2)6-9, (2)8-11, (2)8-12 



D parameter, (2)6-3 

&DATA control statement, (1)1-6, (1)1-8, 
(1)2-4, (1)2-7, (1)2-9, (3)2-3, (3)4-2, 
(3)4-4, (3)4-5, (3)4-12, (3)4-13, B-2 
Data hierarchy within a dataset, (1)2-4 
Dataset 

attribute establishment, (2)1-7 
creation, (2)4-8 

definition and control, (2)1-3, (2)3-1 
Definition List, (1)2-2, A-22 
format, (2)3-2 

parameter, (2)5-3, (2)5-6, (2)5-11, 
(2)8-11 
longevity, (1)2-10 
medium, (1)2-1 
name, (2)3-5 

verb, (1)4-4 
Parameter Area, (1)3-5, (1)3-7, (2)2-8, 
A-7 
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Dataset (continued) 
section, (1)2-9 
size, (2)3-2 
staging, (2)1-1, (2)1-6, (2)1-8, 

(2)1-11, (2)5-1 
structure, (1)2-4 

use tracking, (2)1-6, (2)1-8, (2)1-10 
Dataset Catalog, (1)1-2, (1)1-3, (1)1-7, 
(2)1-4, (2)1-5, (2)1-10, (2)1-11, 
(2)1-12, (2)1-13, (2)4-1, (2)4-15, 
(2)5-1, (2)6-1, (2)6-10 
DATE symbol, (3)2-4 

(2)3-1, (2)3-3, 



(2)5-5, 



(2)6-12, 
-3 



I 5-10 



DC=dc parameter, 

(2)5-6 
DDL, A-2 2 

DEB=i parameter, (2)9-1, (2)9-5 
DEBUG 

control statement, (2)8-6 
parameter, (2)1-14, (2)6-11, 
(2)6-14, (2)8-1, (2)9-4, A- 
Deck structure, job, (1)3-1 
Dedicated resources, (2)2-3 
DEFER parameter, (2)5-5, (2)5-9, (2) 
Deferred submit parameter, (2)5-10 
Define alternate condition, (3)3-2, (3)3-3 
DELETE control statement, (2)4-15 
Delete permanent dataset, (1)4-3, (2)1-5, 

(2)1-12, (2)4-1, (2)4-7, (2)4-15, 

(2)4-18, (2)5-3, (2)9-8, (3)4-11, 

(3)4-14, A-12, A-19, B-6, D-l 
Density, (2)4-8 
Destination front-end system identifier 

parameter, (2)5-10 
Device Label, (1)1-5, (1)1-6 
Device type, (2)3-2 
DF=df parameter, (2)3-1, (2)3-2, (2)4-5, 

(2)4-9, (2)5-2, (2)5-3, (2)5-5, (2)5-6, 

(2)5-10, (2)5-11, (2)8-9, (2)8-11 
Differences parameter, (2)8-11 
Dimension parameter, maximum, (2)8-7 
Direct-access datasets, (2)7-6 
DISABLE parameter, (2)2-3, (2)2-4, 

(2)2-8 
Disk Queue Manager, (1)2-16 
Disk storage units, (1)1-5, (1)1-6 
DISPOSE control statement, (1)1-7, 

(1)4-3, (2)1-11, (2)1-12, (2)5-1, ,„, ., ,, 

(2)5-6, (2)5-7, (2)5-8, (2)5-9, (2)5-10, 

(2)5-11, (3)1-7, A-15 
Disposition code, (1)2-1, (1)2-13, (1)3-3, 

(1)3-4, (2)3-3, (2)3-4, (2)5-6, A-16, 

A-23, D-2 
DN=dn parameter, (2)2-9, (2)2-16, (2)3-1, 

(2)3-2, (2)3-4, (2)4-2, (2)4-5, (2)4-6, 

(2)4-7, (2)4-12, (2)4-13, (2)4-15, 

(2)5-2, (2)5-5, (2)5-6, (2)5-9, (2)5-10, 

(2)6-2, (2)6-5, (2)7-3, (2)7-4, (2)7-5, 

(2)7-6, (2)8-18, (2)9-1, (2)9-2, (3)4-13, 

(3)4-14 
DSDUMP control statement, (2)1-14, (2)8-1, 

(2)8-8, (2)8-9 
DSP, (2)2-5, (2)2-8, (2)8-2, (2)8-3, A-2, 

A-3, A-6, A-7, A-24, D-3 
D1=dt parameter, (2)3-1, (2)3-2, (2)4-5, 

(2)4-8 



(2)2-7, 



(1)2-13, 
(2)5-5, 



$DUMP, (2)1-14, (2)6-5, (2)8-1, (2)8-2, 
(2)8-3, (2)8-6, (2)8-7, (2)8-9 
adjust, (2)8-2 
DUMP control statement, (2)8-2 
Dump, (1)4-4, (2)1-13, (2)1-14, (2)6-1, 
(2)6-2, (2)6-3, (2)6-4, (2)6-5, (2)6-8, 
(2)6-10, (2)8-1, (2)8-2, (2)8-3, (2)8-4, 
(2)8-5, (2)8-6, (2)8-7, (2)8-8, (2)8-9, 
(2)8-10, (2)8-13, (2)8-14, (2)8-15, 
(2)9-8, A-15, A-19 
dataset, (2)8-8 
format parameter, (2)8-9 
permanent dataset, (2)6-2 
registers and memory, (2)8-2 
DUMP=ddn parameter, (2)8-7 
DUMPJOB control statement, (1)2-13, (1)4-1, 
(2)1-14, (2)8-1, (2)8-2, (2)8-3, (2)8-6, 
(2)8-7, (2)8-14, D-4 
DV=Zdu parameter, (2)3-1, (2)3-2, (2)6-2 



E=n parameter, (2)9-1, (2)9-7 
ECHO control statement, (1)3-12, 
(1)4-3, (2)1-2, (2)2-1, (2)2-14 
(3)4-13, (3)4-14, A-4 
ED=<2<^ parameter, (2)4-2, (2)4-5, 
(2)4-13, (2)5-2, (2)5-5, (2)5-8 
(2)6-5, (2)6-6, (3)4-11, (3)4-1 
Edition number parameter, (2)4-2, 
(2)5-2, (2)5-8 
lowest, (2)4-7 
ELSE control statement, (1)3-9, ( 
(2)10-8, (3)1-2, (3)1-3, (3)1-4 
(3)1-7, (3)1-8, (3)3-1, (3)3-2, 
ELSEIF control statement, (1)3-9, 
(3)1-2, (3)1-5, (3)1-6, (3)1-7, 
(3)3-2, (3)3-3 
Enable or suppress logf ile messag 
ENABLE parameter, (2)2-3, (2)2-4, 

(2)2-8, (2)2-14, (2)4-17, A-4 
End 

conditional block, (3)3-2 
iteration, (3)3-4 
iterative block, (3)3-4 
procedure definition, (3)4-5 
End-of-file, (1)3-1 
ENDIF control statement, (1)3-9, 
(3)1-2, (3)1-3, (3)1-4, (3)1-6, 
(3)1-8, (3)3-1, (3)3-2, (3)4-10 
ENDLOOP control statement, (1)4-3 
(3)1-8, (3)3-1, (3)3-3, (3)3-4 
ENDPROC control statement, (1)4-3 
(3)4-2, (3)4-5, (3)4-9, (3)4-10 
(3)4-12, (3)4-13, (3)4-14 
Entry points parameter, (2)8-18 
Error 

and status codes, D-l 
code, (1)3-10, A-12, D-l 
codes for reprieve processing 
conditions, nonfatal, (1)3-9 
message, (2)5-7, (2)6-7, (2)8 
(2)8-12, (2)9-13, (3)4-7, A 
messages parameter, (2)9-7 
Establishing attributes for mass 
datasets, (2)1-7 



(1)4-1, 

, (2)2-15, 

(2)4-6, 
, (2)6-2, 

3 
4-6, 



1)4-3, 
, (3)1-6, 

(3)3-3 

(1)4-3, 

(3)3-1, 

es, (2)2-14 
(2)2-7, 



(1)4-3, 

(3)1-7, 
, (3)4-14 
, (3)1-7, 

, (3)1-10, 
, (3)4-11, 



, D-l 

-11, 
15 

storage 
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Exchange package, (1)3-10, (2)1-2, (2)2-3, 

(2)8-3, C-l, C-2, D-2 
Exchange Processor, (1)3-12 
requests, (1)2-14 
FtBIO (1)2-14 
F$RDC, (1)2-14 
FSWDC, (1)2-14 
EXCLUDE directive, (2)8-8, (2)9-13 
Executable program creation, (2)1-15, (2)9-1 
Execute-only dataset, (1)2-12, (2)4-3, 

4-13, (2)8-1 
Execution parameter, no, (2)9-5 
Existing permanent dataset, (2)1-7 
Exit, (1)3-3, (1)3-8, (1)3-9, (1)3-10, 
(1)4-1, (1)4-2, (2)1-1, (2)1-2, (2)2-1, 
(2)2-4, (2)2-9, (2)8-1, (2)8-2, (2)8-6, 
(2)8-14, (3)1-2, (3)1-3, (3)1-7, (3)1-9, 
(3)3-4, (3)4-13, (3)4-14, D-3 
control statement, (2)2-4 
processing, (1)3-8, (2)2-4 
EXITLOOP control statement, (1)4-3, (3)1-7, 

(3)1-8, (3)3-1, (3)3-4 
Expansion of parenthetic and literal string 

values, (3)4-8 
Expiration date, 4-10 
Explicitly control access to dataset, 

(2)4-16 
Expression 

evaluation, (3)2-6 
operator table, (3)2-5 
parameter, (2)2-13, (2)2-14, (2)8-12, 
(2)8-13, (3)2-1, (3)2-4, (3)2-5, 
(3)2-6, (3)3-2, (3)3-3, (3)3-4 
to logfile, write value of, (2)8-12 
Externals parameter, (2)8-19 



FjBIO, see Exchange Processor request 

F$DNT, (1)2-2, (1)2-3, (1)2-5 

F3RDC, see Exchange Processor calls 

F$WDC, see Exchange Processor calls 

FALSE symbol, (3)2-3 

Fast storage usage, (2)2-13 

Fatal error conditions, (1)3-9 

FETCH control statement, (1)4-3, (2)1-11, 

(2)1-12, (2)5-1, (2)5-9, (2)5-10 
FI=option parameter, (2)2-3 
Field length, (1)3-4, (1)3-5, (1)3-6, 

(1)3-7, (1)3-12, (2)1-2, (2)2-2, (2)2-4, 
(2)2-5, (2)2-6, (2)2-12, (2)9-8, (3)2-3, 
A-3, A-17, D-9 

maximum, (2)2-2 

reduction parameter, (2)9-8 
File 

identifier, (2)4-8 

output sequence, (2)10-4 

searching considerations, (2)10-5 

section number, (2)4-9 
FILE directive, (2)9-18 
File-level output, (2)8-19 
Files parameter, (2)7-2, (2)7-4, (2)8-10, 

(2)8-18 
First word address parameter, (2)8-3 
FL symbol, (3)2-3 
FLM symbol, (3) 2-3 



Floating-point interrupt mode, (2)2-3 
FLODUMP control statement, (2)1-14, (2)8-1, 

(2)8-13, (2)8-14 
Flow trace 

recovery dump, (2)8-13, (2)8-15 
summary, (2)8-14 
Formal parameter specification, (3)4-3 
Format 

dataset, (2)3-2 

parameter, dataset, (2)5-3, (2)5-6, 
(2)5-11, (2)8-11 
FOEMAT=/ parameter, (2)8-2, (2)8-3 
FORTRAN, (1)1-1, (1)2-14, (1)2-16, (1)3-3, 
(2)1-14, (2)3-2, (2)3-4, (2)7-6, (2)8-6, 
(2)8-13, (2)9-20, (2)9-24, (2)9-25, 
(2)9-26, (2)9-31, (2)9-32, (3)1-1, 
(3)1-6, (3)2-4, A-12, A-13, B-l 
FROM directive, (2)10-6 
Front-end 

computer, (1)1-1, (1)3-1, (1)3-2, 
(1)3-4, (2)1-3, (2)1-4, (2)1-5, 
(2)1-6, (2)1-11, (2)1-12, (2)4-1, 
(2)4-4, (2)4-8, (2)4-9, (2)4-10, 
(2)4-14, (2)4-15, (2)4-18, (2)5-1, 
(2)5-3, (2)5-5, (2)5-6, (2)5-7, 
(2)5-10, (2)5-11 

identifier parameter, (2)5-3, (2)5-7 
protect, (2)4-9 
servicing, (2)4-8 
system identifier parameter 
destination, (2)5-10 
source, (2)5-9 
FW=fwa parameter, (2)8-2, (2)8-3 



G0-G7 symbols, (3)2-3 

Generation directive example, (2)9-22, 

(2)9-29 
Generic 

device, (2) 3-5 

name, (2)2-3 



Hardware, (1)1-1, (1)1-2, (1)1-5, A-8, C-l, 

D-2 
Header 1 entry, A-31 
Header 2 entry, A-3 4 



I parameter, (2)6-3, (2)6-6 

I/O, (1)1-2, (1)1-3, (1)1-5, (1)1-8, 

(1)2-1, (1)2-2, (1)2-3, (1)2-5, (1)2-6, 
(1)2-7, (1)2-9, (1)2-10, (1)2-14, 
(1)2-15, (1)2-16, (1)3-5, (1)3-7, 
(1)3-12, (2)1-2, (2)1-3, (2)2-8, (2)2-12, 
(2)2-17, (2)3-2, (2)3-3, (2)4-10, (2)6-2, 
(2)6-5, (2)9-2, (2)9-3, A-3, A-7-13, 
A-23, D-6 

control user's access to, (2)2-8 
area, (1)2-9 

I =idn parameter, (2)7-1, (2)7-2, (2)7-3, 
(2)8-2, (2)8-3, (2)8-7, (2)8-9, (2)10-1 

l=sdir parameter, (2)9-1, (2)9-7 

I@BFI, (1)2-5 
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10=uid parameter, (2)4-2, (2)4-5, (2)4-6, 
(2)4-13, (2)4-16, (2)5-2, (2)5-5, (2)5-7, 
(2)6-2, (2)6-3, (2)6-5, (2)6-6, (2)6-8, 
(2)6-9 

Identification, job, (2)2-1 

IF control statement, (3)3-1 

LF=n parameter, (2)7-3, (2)7-4, (2)8-9, 
(2)8-10 

SIN, (1)1-1, (1)1-4, (1)1-5, (1)1-7, 

(1)2-2, (1)2-4, (1)2-7, (1)2-9, (1)2-10, 
(1)2-14, (1)3-3, (1)3-8, (1)3-9, (1)3-10, 
(1)3-12, (2)1-5, (2)1-9, (2)1-12, 
(2)1-15, (2)2-2, (2)2-11, (2)2-13, 
(2)3-3, (2)3-4, (2)5-3, (2)5-6, (2)5-11, 
(2)7-2, (2)7-3, (2)7-4, (2)7-5, (2)8-8, 
(2)8-17, (2)8-22, (2)9-6, (2)9-7, 
(2)9-10, (2)9-14, (2)9-15, (2)9-17, 
(2)9-20, (2)9-22, (2)9-23, (2)9-29, 
(2)9-30, (2)10-1, (2)10-3, (2)10-4, 
(2)10-5, (2)10-6, (2)10-7, (2)10-8, 
(2)10-10, (3)1-3, (3)1-9, (3)1-10, 
(3)2-2, (3)2-3, (3)2-7, (3)4-2, (3)4-10, 
A-7, A-13, A-29, A-34, D-l 

In-line procedure, (1)3-8, (1)5-1, (3)1-10, 
(3)4-2, (3)4-3, (3)4-5, (3)4-9 

INCLUDE directive, (2)9-13 

Initial 

file parameter, (2)8-10 
memory allocation, (1)3-4 
record parameter, (2)8-9 
sector parameter, (2)8-10 
word parameter, (2)8-9 

Initiation, job, (1)3-2 

Input dataset, (1)2-12 

Inspect library datasets, (2)8-18 

Integer constant, (3) 2-1 

Interactive, (1)1-1, (1)2-1, (1)2-2, 

(1)2-3, (1)2-4, (1)2-6, (1)2-7, (1)3-9, 
(1)3-10, (2)2-10, (2)3-2, (2)6-10, 
(2)6-11, (2)9-4, A-3, A-5, A-8, A-17, 
A-19, A-22, D-3 
datasets, (1)2-2 
format, (1)2-7 
job processing, (1)3-10 

Interblock gaps, (1)2-9 

Interchange format, (1)2-4, (1)2-5, (1)2-6, 
(1)2-9, (1)2-10, (1)2-11, (2)3-3, (2)4-9, 
(2)6-4, (2)7-4, D-4 

Interfaces, (1)2-1, (1)2-14 

Interrupt mode, floating-point, (2)2-3 

Introduce a procedure, (3)4-3 

IOAREA control statement, (1)4-3, (2)1-2, 
(2)2-1, (2)2-8 

IR=n parameter, (2)8-9 

IS=n parameter, (2)8-9, (2)8-10 

ITEMIZE control statement, (1)5-2, (2)1-14, 
(2)8-1, (2)8-18, (2)8-19, (2)8-20, (2)8-21 

Iteration, end, (3)3-4 

Iterative, (1)3-8, (1)4-5, (3)1-1, (3)1-7, 
(3)1-8, (3)3-1, (3)3-3, (3)3-4, A-5, A-26 
control statement block, (3)1-7 
begin, (3)3-3 
end, (3)3-4 
structure, (3)1-8 

IW=n parameter, (2)8-9 



J0-J7 symbols, (3)2-3 
JBI, A-26 
JCB, A-l 
JCL 

Block Information Table, A-26 
conditional block information, A-2 6 
iterative block information, A-26 
Symbol Table (JST) , A-27 
symbols, (3)2-3 
JN=jn parameter, (2)2-1, (2)2-2 
Job 

advancement, (1)3-3 

class, (2)2-3 

control language, (1)4-1 

expressions, (3)2-1 
deck structure, (1)3-1 
definition, (2)1-2 
entry, (1)3-2 
flow, (1)3-2 
identification, (2)2-1 
initiation, (1)3-2 
logfile and accounting information, 

(1)3-10 
memory management, (1)3-4 
name, (2)2-2, (2)2-12 
processing, interactive, (1)3-10 
rerun, (1)3-7 
size, (2)2-12 
step, (1)3-10 

abort, (1)3-8, (1)3-9, (1)4-2, 

(2)1-2, (2)2-4, (2)2-10, (2)2-13, 
(2)4-9, (2)5-8, (3)1-2, (3)1-3, 
(3)1-8, (3)3-3, (3)3-4 
accounting, (2)2-11 
termination, (1)3-3, (2)2-12 
user area, A-l 
Job Communication Block, (1)1-5, (1)3-5, 
(2)9-5, (2)9-12, A-l, A-2, D-2 
length parameter, (2)9-5 
JOB control statement, (2)2-1 
Job Table Area, (1)1-4, (1)3-3, (1)3-4, 
(1)3-5, (1)3-7, (1)3-12, (2)2-2, (2)8-3, 
A-l, A-27, D-l 
JSR symbol, (3) 2-3 
JST, A-27 
JTA, (1)1-4, (1)1-5, (1)3-3, (1)3-4, 

(1)3-12, (2)2-2, (2)2-5, (2)2-12, (2)8-1, 
(2)8-2, (2)8-3, A-l, A-ll, A-29, D-l, 
D-3, D-8 



Keyed default value, (3)4-4, (3)4-7, 

(3)4-8, (3)4-9, (3)4-12 
Keyword 

parameter, (1)4-6, (2)9-14, (3)4-3, 

(3)4-4, (3)4-7, (3)4-10 
substitution after expansion, (3)4-7 



h=ldn parameter, (2)6-8, (2)8-11, 

(2)8-16, (2)9-1, (2)9-6, (2)10-1, (2)10-2 
LA, see Limit Address 

Label Definition Table, A-ll, A-18, A-28, 
A-30, A-31, A-34, D-4 
header 1 entry, A-31 
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Label Definition Table (continued) 
header 2 entry, A-34 
header, A-28 
volume 1 entry, A-30 
Label, Device, (1)1-5, (1)1-6 
Last word address parameter, (2)8-3 
LDR control statement, (1)2-13, (1)3-7, 
(1)5-1, (2)1-15, (2)8-6, (2)8-14, 
(2)8-18, (2)9-1, (2)9-13, (2)9-17, 
(2)9-23, (2)9-24, (2)9-29, (2)9-31, 
(2)9-33, (3)1-6, (3)1-7, (3)4-9, (3)4-10, 
(3)4-12, A-2, A-3 
LDT header, A-28 
LDT, A-28 

LE parameter, (2)4-5, (2)4-7, (3)2-5 
LFT, A- 6 

LlB=Wn parameter, (2)9-1, (2)9-2 
Libraries, (1)5-1 
Library 

datasets, (1)5-2, (2)1-14, (2)1-16, 
(2)2-15, (2)8-1, (2)8-18, (2)8-19, 
(2)8-20, (2)10-1 
inspect, (2)8-18 
searchlist, (1)4-2, (1)4-3, (2)2-15, 
(2)2-16 

list and/or change, (2)2-15 
LIBRARY control statement, (2)2-15 
Library-defined verbs, (1)4-3 
Limit Address (LA), (1)1-5 
Lines per page, (2)2-16 
LIST directive, (2)10-8 
Literal constant, (3)2-2, (3)4-8 
Literal string, (1)4-1, (1)4-6, (3)2-7, 

(3)2-8, (3)2-9, (3)4-8, (3)4-11, (3)4-12 
LLD parameter, (2)9-1, (2)9-3 
LM=im parameter, (2)3-1, (2)3-3 
Load 

map, (.2)9-10 

module, absolute, (2) , 1-15 
parameter, compressed, (2)9-5 
permanent dataset, (2)6-4 
Loader, (1)1-7, (1)5-2, (2)1-15, (2)1-16, 
(2)4-5, (2)8-6, (2)8-7, (2)9-1, (2)10-1, 
(2)10-10, (3)1-6 
errors, (2)9-9 
example, (2)9-8 
Local dataset, (1)2-13 

name, (2)3-2, 4-2, 4-6, (2)4-12, 4-13, 
4-15 
verbs, (1)4-3 
utilities, (2)1-13, (2)7-1 
LOCK parameter, (2)2-8, D-l 
SLOG, (1)3-3, (1)3-4, (1)3-10, (2)2-17 
Logfile, (1)3-3, (1)3-10, (1)3-11, (1)3-12, 
(1)3-13, (1)4-1, (1)4-7, (2)1-2, (2)1-14, 
(2)2-10, (2)2-13, (2)2-14, (2)2-15, 
(2)2-16, (2)6-4, (2)8-1, (2)8-12, 
(2)8-13, (2)9-5, (2)9-6, (2)9-7, A-l, 
A-4, D-6 

and accounting information, job, (1)3-10 
messages, enable or suppress, (2)2-14 
write value of expression to, (2)8-12 
Logical 

device, (2)3-2 
File Table, A-6 



Logical (continued) 

I/O, (1)2-14, (1)2-16, A-7, A-12 

operators, (3)2-6 
Longevity, dataset, (1)2-10 
LOOP control statement, (1)4-3, (3)1-7, 

(3)1-8, (3)3-1, (3)3-3, (3)3-4 
Lowest edition number, (2)4-7 
LW= Iwa parameter, (2)8-2, (2)8-3 



H=mn parameter, (2)4-2, (2)4-3, (2)4-5, 
(2)4-7, (2)4-13, (2)4-14, (2)5-2, (2)5-3, 
(2)5-5, (2)5-8 
Magnetic tape, (1)1-8, (1)2-1, (1)2-2, 
(1)2-3, (1)2-5, (1)2-6, (1)2-9, (1)2-12, 
(1)3-13, (2)1-3, (2)1-4, (2)1-5, (2)3-1, 
(2)3-2, (2)3-3, (2)4-1, (2)4-5, (2)4-12, 
(2)4-15, (2)5-3, (2)5-6, (2)5-11, (2)7-5, 
A-16, A-23 

characteristics, (1)1-8 
datasets, (1)2-3 
permanent datasets, (1)2-12 
Mainframe computer identifier parameter, 

(2)5-11 
Maintenance Control Unit, (1)1-2 
Maintenance control word, (2)4-3, 4-7 
Map 

control parameter, (2)9-4 
output, (2)9-6 
MAP=op parameter, (2)9-1, (2)9-4 
Mass storage, (1)1-1, (1)1-2, (1)1-5, 

(1)1-6, (1)1-7, (1)2-1, (1)2-2, (1)2-10, 
(1)2-12, (1)3-2, (1)3-3, (1)3-4, (1)3-7, 
(2)1-3, (2)1-4, (2)1-5, (2)1-6, (2)1-7, 
(2)1-8, (2)1-9, (2)1-10, (2)1-11, 
(2)1-12, (2)1-13, (2)1-15, (2)2-17, 
(2)3-1, (2)3-2, (2)3-3, (2)3-4, (2)4-1, 
(2)4-6, (2)4-7, (2)4-8, (2)4-12, (2)4-15, 
(2)4-16, (2)5-1, (2)5-6, (2)5-10, 
(2)5-11, (2)6-4, (2)6-11, (2)7-5, (2)9-1, 
(2)9-15, (2)9-16, (3)4-13, D-5 
characterstics, (1)1-5 
dataset, (1)2-1 

attributes, (2)1-4 
establishing attributes for, (2)1-7 
permanent datasets, (1)2-12, (2)1-9, 
(2)1-13 
MAXDIK=dim parameter, (2)8-7 
Maximum 

dimension parameter, (2)8-7 
field length, (2)2-2 
size limit, (2)3-3 
size of SOUT, (2)2-2 
tape block size (2)4-9 
ME=maxe parameter, maximum, (2)8-11 
Medium, dataset, (1)2-1 
Memory 

allocation, initial, (1)3-4 
dump registers and, (2)8-2 
initialization parameter, (2)9-6 
layout of a relocatable overlay image, 

(2)9-16 
layout when relocatable overlays exist, 

(2)9-15 
management, job, (1)3-4 
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Memory (continued) 

resident, (1)1-3, (1)2-1, (1)2-2, 
(1)3-12, (2)1-4, (2)2-12, (2)3-3, 
(2)7-5, A-8, A-22 
MEMORY control statement, (2)2-4 
Message 

enable or suppress logfile, (2)2-14 
error, (2)5-7, (2)6-7, (2)8-11, 

(2)8-12, (2)9-13, (3)4-7, A-15 
parameter, error, (2)9-7 
MF=mf parameter, (2)5-2, (2)5-3, (2)5-5, 

(2)5-10, (2)5-11 
MODE control statement, (2)2-3 
Mode, bidirectional transfer, (2)2-4 
Modes of field length reduction, (1)3-4 
MODIFY control statement, (1)4-3, (2)1-5, 
(2)1-7, (2)1-9, (2)1-10, (2)1-12, 
(2)1-13, (2)4-1, (2)4-12, (2)4-13, 
(2)4-14, (2)4-16, (2)4-17, (2)9-8 
MR parameter, (1)2-2, (2)3-1, (2)3-3 
Multiplexer channels. Block, (1)1-8 



n=x parameter, (2)2-6 
NA parameter, (2)4-2, (2)4-3, (2)4-5, 
(2)4-6, (2)4-12, (2)4-13, (2)4-14, 
(2)4-15, (2)4-16, (2)6-5, (2)6-7, (2)9-1, 
(2)9-6, (2)9-7, (3)4-11, (3)4-13, (3)4-14 
Name 

dataset, (2)3-5 
job, (2)2-2, job, (2)2-12 
verb, dataset, (1)4-4 
Named common, (2)9-9, (2)9-20, (2)9-28 
Naming conventions, (1)2-14 
mL=ndn parameter, (2)10-1, (2)10-2, 

(2)10-3 
New 

account password, (2)2-11 

additional user identification, (2)4-13 

edition number, (2)4-13 

maintenance permission control word, 

(2)4-13 
permanent dataset, (2)1-7 

name, (2)4-13 
read permission control word, (2)4-13 
retention period, (2)4-13 
user pasword, (2)2-11 

write permission control word, (2)4-13 
NF=* parameter, (2)7-2, (2)7-4, (2)8-9, 

(2)8-10, (2)8-18 
No 

abort parameter, (2)4-3, (2)4-6, 

(2)4-13, (2)4-15, (2)4-16, (2)9-6 
execution parameter, (2)9-5 
release parameter, (2)5-9, (2)5-10 
rewind parameter, (2)8-18 
NODIR parameter, (2)10-1, (2)10-2, (2)10-3, 

(2)10-10 
N0LIB=Wn parameter, (2)9-1, (2)9-3 
Nonfatal error conditions, (1)3-9 
NORERUN control statement, (1)4-3, (2)1-2, 

(2)2-1, (2)2-7 
Normal advance, (1)3-3 
UOTBLKS=nblk parameter, (2)8-7, (2)8-8 



Notes parameter, (1)1-6, (1)4-2, (2)1-4, 
(2)1-6, (2)1-7, (2)1-11, (2)4-2, (2)4-4, 
(2)4-13, (2)4-15, (2)4-18, (2)5-2, 
(2)5-4, (2)5-5, (2)6-10, (2)6-12, 
(2)6-15, A-20, D-9 
NOTSYMS=nsym parameter , (2)8-7 
NOWAIT parameter, (2)5-5, (2)5-9 
NOWN=nou parameter, (2)6-6 
NR=« parameter, (2)7-1, (2)7-2, (2)7-3, 

(2)8-9 
NRLS parameter, (2)5-5, (2)5-9, (2)5-10 
NS=n parameter, (2)8-9, (2)8-10 
Number of 

differences parameter, (2)8-11 
files parameter, (2)7-2, (2)7-4, 

(2)8-10, (2)8-18 
records parameter, (2)7-2, (2)7-3, 

(2)7-6 
routine levels parameter, (2)8-7 
sectors parameter, (2)8-10 
words parameter, (2)8-9 
NW=)i parameter, (2)8-9 
NX parameter, (2)9-1, (2)9-3, (2)9-5, 

(2)9-6, (2)9-7, (2)9-8, (3)4-9, (3)4-10, 
(3)4-12 
NXP parameter, (2)8-2, (2)8-3 



parameter, (2)6-3, (2)6-6 

0=odn parameter, (2)7-1, (2)7-2, (2)7-3, 

(2)8-2, (2)8-3, (2)8-7, (2)8-9 
Object code libraries, (1)5-2 
Object library management, (2)1-15, (2)6-5, 

(2)10-1 
Object module, (2)1-15 
0BL=odn parameter, (2)10-1, (2)10-2 
ODN, A-24 

OFF=cZase parameter, (2)2-14 
OlM-olm parameter, (2)2-1, (2)2-2 
OMIT directive, (2)10-3, (2)10-6, (2)10-7, 

(2)10-8 
ON=olass parameter, (2)2-14 
Open Dataset Name Table (ODN) , A-24 
OPEN macro, (1)2-10 
Operands, (1)1-5, (3)2-1, (3)2-5 
Operating 

mode, (2)2-3 

system, (1)1-1, (1)1-3, (1)1-4, (1)1-5, 
(1)2-1, (1)2-7, (1)2-10, (1)2-13, 
(1)3-2, (1)3-3, (1)3-4, (1)3-11, 
(1)4-1, (1)5-1, (2)1-1, (2)1-2, 
(2)1-13, (2)2-1, (2)2-2, (2)2-7, 
(2)4-5, (2)9-8, (2)9-12, (2)10-1, 
(3)1-10, A-l, A-33, A-35 
Operator, (1)3-7, (1)3-12, (2)4-8, (3)2-1, 

(3)2-5, (3)2-6, D-2, D-6 
OPT, A-25 

OPTION control statement, (2)2-16 
Option Table (OPT) , A-25 
options parameter, (2)2-12 
SOOT, (1)2-13, (1)3-3, (1)3-4, (1)3-10, 
(2)2-2, (2)3-4, (2)6-4, (2)6-7, (2)6-8, 
(2)7-2, (2)7-3, (2)8-3, (2)8-7, (2)8-9, 
(2)8-11, (2)8-16, (2)8-18, (2)9-6, 
(2)10-2, (3)4-10, A-7, A-18 
maximum size of, (2)2-2 
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Output 

datasets, (1)2-12 

for binary library datasets, (2)8-20 
Overlay, (2)9-1, (2)9-2, (2)9-3, (2)9-6, 
(2)9-9, (2)9-10, (2)9-14, (2)9-17, A-4 
directives, (2)9-18 
generation log, (2)9-3 3 
load parameter, (2)9-6 
loading 

type 1, (2)9-21 
type 2, (2)9-27 
OVL=dir parameter, (2)9-1, (2)9-6, 

(2)9-17, (2)9-24, (2)9-31 
OVLDN directive, (2)9-3, (2)9-18, (2)9-23, 
(2)9-24, (2)9-25, (2)9-26, (2)9-29, 
(2)9-30, (2)9-31, (2)9-32 
OVLL directive, (2)9-17, (2)9-19, (2)9-28, 

(2)9-29, (2)9-30, (2)9-32 
OWN=ou parameter, (2)6-6 
Ownership parameters, (2)6-6, (2)4-7, (2)5-4 



P=p parameter, (2)2-1, (2)2-2 

Pad parameter, (2)9-8 

Page limit parameter, (2)8-8 

PAGES=rcp parameter, (2)8-7, (2)8-8 

Parameter 

interpretation, (1)4-7 
substitution, (3)1-9, (3)4-6 

Parameters, (1)4-4 

Parentheses, (1)4-5, (2)2-14, (2)4-4, 

(2)5-4, (2)8-17, (2)9-12, (3)2-1, (3)2-6, 
(3)2-7, (3)2-8, (3)4-8, (3)4-10, (3)4-11, 
(3)4-12, A-4, B-l 

Parenthetic string, (3)2-7, (3)2-8, (3)2-9 

Partial delete, (2)4-15 

Partially relocated modules, (2)9-14 

PDD, A-14 

status, D-7 

PDM, see Permanent Dataset Manager 

PDMFC symbol, (3)2-4 

PDMST symbol, (3)2-4 

PDH=pdn parameter, (2)4-2, (2)4-5, 

(2)4-6, (2)4-8, (2)4-13, (2)4-16, (2)5-2, 
(2)6-2, (2)6-6, (2)6-8, (3)4-11, (3)4-13 

PDS=pds parameter, (2)6-2 

PDSDUMP, (1)2-13, (2)1-13, (2)6-1, (2)6-2, 
(2)6-3, (2)6-4, (2)6-5, (2)9-8, A-15 
control statement, (2)6-2 

PDSLOAD, (2)1-7, (2)1-13, (2)6-1, (2)6-4, 
(2)6-5, (2)6-6, (2)6-7 
control statement, (2)6-4 
listing, (2)6-7 

Permanent dataset, (1)1-2, (1)1-3, (1)1-7, 
(1)2-2, (1)2-3, (1)2-12, (1)2-14, (1)3-8, 
(1)3-12, (2)1-1, (2)1-3, (2)1-4, (2)1-5, 
(2)1-6, (2)1-7, (2)1-8, (2)1-9, (2)1-10, 
(2)1-11, (2)1-12, (2)1-13, (2)2-12, 
(2)3-1, (2)3-4, (2)4-1, (2)4-2, (2)4-3, 
(2)4-4, (2)4-5, (2)4-6, (2)4-7, (2)4-8, 
(2)4-10, (2)4-12, (2)4-13, (2)4-14, 
(2)4-15, (2)4-16, (2)4-17, (2)5-1, 
(2)5-2, (2)5-3, (2)5-4, (2)5-5, (2)5-8, 
(2)6-1, (2)6-2, (2)6-4, (2)6-5, (2)6-6, 
(2)6-7, (2)6-8, (3)2-4, (3)4-11, (3)4-13, 
A-14, A-20, A-23, D-6 



Permanent Dataset (continued) 
Definition, A-14, A-15, D-6 
management, (2)1-3, (2)1-5, (2)4-1 
Manager (PDM), (1)3-12, (2)1-4 
name, (2)4-2, 4-6, 4-8, 4-16 
space, (2)2-12 
status codes, D-6 
utilities, (2)1-13, (2)6-1 
Permission control words, (2)1-4 
PERMIT control statement, (1)4-3, (2)1-4, 
(2)4-1, (2)4-4, (2)4-16, (2)5-4, (2)6-1, 
(2)6-10, (2)8-6, A-19, A-20, D-9 
Permits attribute, (2)1-6 
Physical I/O, (1)2-16 
Positional parameter, (1)4-4, (1)4-6, 

(3)4-6, (3)4-7 
POVL directive, (2)9-17, (2)9-20, (2)9-22, 

(2)9-23, (2)9-24, (2)9-26 
PRINT control statement, (2)8-12 
Priority, (2)2-2 
Privacy, (2)1-8, (2)1-9, (2)6-1 
Private datasets, (2)1-9 
$PROC, (2)2-15, (3)1-10, (3)4-3, (3)4-9, 
(3)4-10, (3)4-11, (3)4-12, (3)4-13, 
(3)4-14 
PROC control statement, (1)4-3, (2)2-15, 
(3)1-10, (3)4-2, (3)4-3, (3)4-9, (3)4-10, 
(3)4-11, (3)4-12, (3)4-13, (3)4-14 
Procedure, (1)1-2, (1)3-8, (1)3-9, (1)3-10, 
(1)4-1, (1)4-3, (1)4-5, (1)5-1, (2)2-9, 
(2)2-14, (2)2-15, (3)1-1, (3)1-4, (3)1-9, 
(3)1-10, (3)2-2, (3)2-3, (3)4-1, A-5, 
A-26, A-27, D-3 

calling statement, (2)2-9 
data, (3)4-5 

definition, (1)4-1, (1)4-3, (1)4-5, 
(1)5-1, (3)1-10, (3)4-1, (3)4-2, 
(3)4-3, (3)4-4, (3)4-5, (3)4-8, A-27 
begin, (3)4-3 
body, (3)4-4 
deck structure, (3)4-1 
end, (3)4-5 
in-line, (1)3-8, (1)5-1, (3)1-10, 

(3)4-2, (3)4-3, (3)4-5, (3)4-9 
introduce a, (3)4-3 
library, (1)5-1 
name, (3)4-3 
Produce symbolic dump, (2)8-6 
Program 

library, (1)5-1 
module 

groups, (2)10-4 
names, (2)10-3 
ranges, (2)10-4 
Protecting and accessing mass storage 

datasets, (2)1-8 
Prototype, (2)2-9, (3)1-9, (3)1-10, (3)4-1, 

(3)4-3 
Public 

access 

mode, (2)1-4, (2)1-6, (2)1-7, 

(2)1-8, (2)1-9, (2)1-10, (2)1-11, 
(2)1-12, (2)4-3, (2)4-4, (2)4-12, 
(2)4-14, (2)5-4, (2)6-8, (2)6-10, 
A-19, A-20 
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Public (continued) 

tracking, (2)1-4, (2)1-6, (2)1-7, 
(2)1-10, (2)1-11, (2)4-4, (2)4-17, 
(2)5-4 
datasets, (2)1-9 
PW=pW parameter, (2)2-10, (2)2-11 



R=rd parameter, (2)4-2, (2)4-5, (2)4-6, 

(2)4-13, (2)5-2, (2)5-5, (2)5-8 
Random dataset, (2)3-2 
RDM parameter, (2)3-1, (2)3-2 
Read 

control statements from alternate 

dataset, (2)2-9 
control word, (2)4-2, 4-6 
Record 

control word, (1)2-5, (1)2-6 
length, (2)7-6 
parameter, initial, (2)8-9 
positioning, (1)2-3 
Recording format, (2)4-9 
Records 

parameter, (2)7-2, (2)7-3, (2)7-6 
per file parameter, (2)8-9 
Registers and memory, dump, (2)8-2 
Relational operators, (3)2-6 
Relationship of levels of user I/O, (1)2-15 
Release 

dataset, (2)3-4 
parameter, no, (2)5-9, (2)5-10 
RELEASE control statement, (1)1-7, (1)2-10, 
(1)4-3, (2)1-3, (2)1-11, (2)2-17, (2)3-1, 
(2)3-4, (2)4-15, (2)5-6, (2)5-9, (2)5-10, 
(3)4-11, (3)4-13, (3)4-14, A-15 
Relocatable 

loader, (1)5-2, (2)1-15, (2)1-16, 

(2)9-1, (2)9-14, (2)9-17 
modules, (2)1-15 

overlay, (2)9-1, (2)9-14, (2)9-15, 
(2)9-16, (2)9-17 
generation of, (2)9-14 
Relocation, (2)9-9, (2)9-10, (2)9-15, 

(2)9-16 
Remove permit, (2)4-16 
REPLACE, (2)1-13, (2)9-24, (2)9-30, 

(2)10-1, (2)10-2, (2)10-3, (3)4-2, (3)4-4 
Reprieve, (1)3-8, (1)3-9, (1)3-10, (1)4-2, 
(2)1-1, (2)6-7, D-l-6 
error codes for, D-l 
Request memory change, (2)2-4 
RERUN control statement, (1)3-7, (1)4-3, 

(2)1-2, (2)2-1, (2)2-7, (2)2-8, A-17 
Resource reporting, (2)2-11 
Retention period parameter, (2)4-2, (2)5-2, 

(2)5-8 
RETURN control statement, (2)2-9 
REWIND control statement, (2)7-5 
Rewind dataset, (2)7-5 
Rewind parameter, no, (2)8-18 
RL=rl parameter, (2)7-6 
Roll a user job to disk, (2)2-13 
ROLLJOB control statement, (1)4-3, (2)1-2, 
(2)2-1, (2)2-13 



ROOT directive, (2)9-17, (2)9-19, (2)9-20, 
(2)9-22, (2)9-23, (2)9-24, (2)9-26, 
(2)9-28, (2)9-29, (2)9-30, (2)9-31, 
(2)9-32 

Routine levels parameter, (2)8-7 

RP parameter, (2)6-6 

R1=rt parameter, (2)4-2, (2)4-5, (2)4-10, 
(2)4-13, (2)5-2, (2)5-5, (2)5-8 



S parameter, (2)6-3, (2)6-6 
S=size parameter, (2)3-1, (2)3-2 
SAVE, (1)2-10, (1)2-12, (1)4-3, (2)1-5, 
(2)1-7, (2)1-8, (2)1-9, (2)1-10, (2)1-12, 
(2)4-1, (2)4-2, (2)4-3, (2)4-6, (2)4-7, 
(2)4-12, (2)4-16, (2)4-17, (2)4-18, 
(2)5-6, (2)5-11, (2)8-2, (2)8-16, 
(2)8-17, (2)9-8, (2)10-9, (2)10-10, 
(3)4-10, (3)4-14, A-10 
control statement, (2)4-1 
SBCA directive, (2)9-19, (2)9-20, (2)9-24, 

(2)9-30, A-4 
SDN=sd)i parameter, (2)5-5, (2)5-10, 

(2)5-11, (2)9-13 
Section 

dataset, (1)2-9 
number, file, (2)4-9 
Sector parameter, initial, (2)8-10 
Sectors parameter, (2)8-10 
Selective load parameter, (2)9-7, (2)9-13, 

(2)9-14 
Semiprivate datasets, (2)1-9 
Sense switch, (2)2-6, (3)1-4, (3)2-3 
Separators, (1)4-1, (1)4-4, (1)4-5, (1)4-6, 

(3)2-7, (3)2-8, (3)4-8, (3)4-12 
Set 

operating mode, (2)2-3 
or clear sense switch, (2)2-6 
user-defined options, (2)2-16 
SET control statement, (2)2-13 
SET=ual parameter, (2)9-1, (2)9-6 
SETRPV, (1)3-10 

SF=s/ parameter, (2)5-5, (2)5-7 
Shorthand notation, (2)6-1, (2)8-6 
Simple procedures, (3)1-9 
Size 

dataset, (2)3-2 
job, (2)2-12 
limit, maximum, (2)3-3 
Skip 

dataset, (2)7-5 
files, (2)7-4 
records, (2)7-3 
SKIPD control statement, (2)1-13, (2)7-1, 

(2)7-5 
SKIPF control statement, (2)1-13, (2)7-1, 

(2)7-4, (2)7-5 
SKIPR control statement, (2)1-13, (2)7-1, 

(2)7-3, (2)8-16 
SN symbol, (3)2-3 
SO parameter, (2)6-4, (2)6-7 
Solid-state Storage Device, (2)2-13 
SORT, (2)10-1, (2)10-3, (2)10-4 
Source front-end system identifier 
parameter, (2)5-9 
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SOVL directive, (2)9-17, (2)9-20, (2)9-22, 
(2)9-23, (2)9-24, (2)9-26 

Special form information parameter, (2)5-7 

SR=options parameter, (2)2-12 

SSW symbol, (3)2-3 

Staged dataset name parameter, (2)5-5, 
(2)5-11 

Staging, dataset, (2)1-1, (2)1-6, (2)1-8, 
(2)1-11, (2)5-1 

Startup, (1)1-1, (1)1-2, (1)4-4, D-8 

Stations, (1)1-1 

Status, (1)3-13, (2)1-13, (2)4-3, (2)4-14, 
(2)6-1, (2)6-7, (3)2-3, (3)2-4, A-3 , A-7, 
A-8, A-ll, A-12, A-16, A-18, D-l, D-6 

String, (1)4-1, (1)4-6, (2)1-6, (2)1-12, 
(2)2-9, (2)8-6, (2)8-7, (2)8-8, (2)8-12, 
(2)9-1, (2)9-4, (3)1-10, (3)2-1, (3)2-2, 
(3)2-7, (3)2-8, (3)2-9, (3)4-3, (3)4-4, 
(3)4-5, (3)4-6, (3)4-7, (3)4-8, (3)4-11, 
(3)4-12 

Structure, dataset, (1)2-4 

Subexpression, (3)2-4 

SUBMIT control statement, (1)4-3, (2)1-11, 
(2)1-12, (2)5-1, (2)5-7, (2)5-9, (2)5-10, 
A-15 

Substitution parameters, (3)1-9, (3)4-4 
Suppress 

control statement parameter, (2)9-7 
logfile messages, enable or, (2)2-14 
SWITCH control statement, (1)4-3, (2)1-2, 

(2)2-1, (2)2-6, (3)1-4, (3)2-3 
symbol parameter, (2)2-13, (2)2-14, 

(3)2-3, (3)2-4, A-27 
Symbol value, change, (2)2-13 
Symbolic 

dump, (2)1-14, (2)8-1, (2)8-6, (2)8-7, 

(2)8-8 
variable, (2)1-2, (3)2-2, (3)2-3, (3)2-4 
table, (3)2-3 
Symbols list parameter, (2)8-7 
SYMS=sym parameter, (2)8-7 
Syntax violations, (1)4-2 
SYSID symbol, (3)2-3 
SYSREF control statement, (2)1-14, (2)8-1, 

(2)8-15, (2)8-16 
System 

dataset name verbs, (1)4-4 
Directory, (1)4-2, (1)4-4, (2)4-5, 

(2)9-2, (2)9-8, A-17, D-l, D-8 
error codes, D-l 
initialization, (1)1-2 
management of memory, (1)3-7 
verbs, (1)4-3 
SZ=dsz parameter, (2)6-8, (2)6-9 

T registers, (2)8-3 

T=t I parameter, (2)2-1, (2)2-2 

Tape 

block, (1)2-9 

size (2)4-9 
dataset 

conversion, (2)4-10 
generic device name, (2)4-8 
label type, (2)4-9 



Tape (continued) 

record format, (2)4-11 
record size, (2)4-11 
devices reserved, (2)2-13 
formats, (1)2-9 
I/O, (2)4-10 

Queue Manager (TQM), (1)2-16, (2)1-4 
units, (1)1-8 
volume, (1)2-9 
Task I/O, (1)2-14 

TCR=mm/dd/yy parameter, (2)6-8, (2)6-9 
Temporary, (1)2-13, (1)3-13, A-9, A-18 
dataset, (1)1-7, (1)2-2, (1)2-10, 
(2)2-12, (3)4-2, (3)4-5 
Terminal identifier parameter, (2)5-7, 

(2)5-10, (2)5-11 
Termination, job, (1)3-3, (2)2-12 
Terminator, (1)4-1, (1)4-5, (2)2-6, (2)5-8, 
(2)5-12, (2)9-4, (2)9-18, (3)4-5, (3)4-7, 
(3)4-11 
Text, (2)1-4, (2)1-6, (2)1-7, (2)1-11, 

(2)1-13, (2)2-6, (2)4-18, (2)5-4, (2)6-8, 
(2)6-10, (2)8-11, (2)8-17, (2)9-16, 
(3)4-2, (3)4-4, A-16, A-17, A-19, A-20, 
B-2, D-8, D-9 
TEXT=text parameter, (2)1-12, (2)4-2, 

(2)4-4, (2)4-13, (2)4-14, (2)5-2, (2)5-3, 
(2)5-5, (2)5-8, (2)5-10, (2)5-12 
TID=tid parameter, (2)5-2, (2)5-3, 

(2)5-5, (2)5-7, (2)5-9, (2)5-10, (2)5-11 
Time 

executing, (2)2-12 
limit, (2)2-2 
TIME symbol, (3)2-4 
TIMELEFT symbol, (3)2-4 
Title line parameter, (2)8-8 
TLA=mm/dd/yy parameter, (2)6-8, (2)6-9 
1lM=mm/dd/ yy parameter, (2)6-8, (2)6-9 
TQM, see Tape Queue Manager 
TRACE=n parameter, (2)8-7 
Track accesses parameter, (2)4-4, 4-13, 

(2)5-5 
Tracking, dataset use, (2)1-6, (2)1-8, 

(2)1-10 
Transfer 

mode, bidirectional, (2)2-4 
name parameter, (2)9-4 
Transparent format, (1)1-8, (1)2-10, 

(2)4-9, (2)4-10 
TRUE symbol, (3)2-3 
Truncation parameter, (2)8-18 
Type 1 overlay 

execution, (2)9-24 
generation 

directives, (2)9-20 
rules, (2)9-23 
loading, (2)9-21 
structure, (2)9-19 
Type 2 overlay 

execution, (2)9-31 
generation 

directive, (2)9-28 
rules, (2)9-30 
loading, (2)9-27 
structure, (2)9-26 
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U parameter, (2)3-3 WRITEDS control statement, (2)7-6 

Unblocked, (1)2-4, (1)2-7, (1)2-9, (1)2-10, WRITEDS, (2)1-14, (2)7-1, (2)7-6 
(1)2-14, (1)2-16, (2)1-14, (2)3-2, 
(2)3-3, (2)8-1, (2)8-2, (2)8-3, (2)8-8, 
(2)8-9, (2)8-10, D-4 X parameter, (2)6-3 

dataset structure, (2)3-3 X.=mm/dd/yy parameter, (2)6-8, (2)6-9 

format, (1)2-7 X=xdn parameter, (2)8-16 

Unconditionally set job rerunnability, XI0P » see Auxiliary I/O Processor 

(2)2-7 
Unique access parameter, (2)4-3, 4-7, (2)5-3 
Unit name, (2)3-4 
UNLOCK, (2)2-8, D-l 

Unsatisfied external abort parameter, (2)9-6 
Unsatisfied externals, (2)9-2 
UQ parameter, (1)4-7, (2)4-2, (2)4-3, 
(2)4-5, (2)4-7, (2)4-12, (2)4-15, 
(2)4-17, (2)4-18, (2)5-2, (2)5-3, (2)8-16, 
(3)4-11, (3)4-13, (3)4-14, A-14 
US=us parameter, (2)2-1, (2)2-2, (2)2-10, 
(2)2-11, (2)6-2, (2)6-3, (2)6-5, (2)6-6, 
(2)6-8, (2)6-9 
USA parameter, (2)9-1, (2)9-6 
Use tracking, dataset, (2)1-6, (2)1-8, 

(2)1-10 
User 

area, (1)1-4, (1)3-5, A-l, A-21, D-3 
dataset naming conventions, (1)2-14 
field, (1)1-4, (1)1-5, (1)2-10, (1)3-3, 
(1)3-4, (1)3-12, (2)1-15, (2)2-5, 
(2)2-8, (2)8-1, (2)8-7, (2)9-1, 
(2)9-12, A-7, A-22, A-24, A-26, D-9 
I/O interfaces, (1)2-14 
management of memory, (1)3-6 
number, (2)2-2, 2-11, 2-12 
ownership value, (2)4-16 
password, (2)2-11 

Validate user number and account, (2)2-10 

Value, change symbol, (2)2-13 

Vector registers, (2)8-3 

Verb, dataset name, (1)4-4 

Verbs, (1)4-2 

Volume 

1 entry, A-29 

allocation, (1)2-3 

identifier, (1)2-3 

sequence number, (2)4-9 

serial number, (2)4-8 

W parameter, (2)4-3, 4-7, 4-13 

W=ufc parameter, (2)4-2, (2)4-3, (2)4-5, 

(2)4-7, (2)4-13, (2)5-2, (2)5-5, (2)5-8 
WAIT parameter, (1)3-12, (2)2-12, (2)5-5, 

(2)5-8, (2)5-9, A-15 
Wait time, (2)2-12 
Well-defined procedures, (3)1-9 
Width parameter, compare, (2)8-12 
Word parameter, initial, (2)8-9 
Words parameter, (2)8-9 
Write 

control word, (2)4-3, 4-7 

random or sequential dataset, (2)7-6 

value of expression to logfile, (2)8-12 
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